Предмет: Информатика,
автор: inaikonnikow
Составьте программу, которая из трёх введённых с клавиатуры чисел возводит в квадрат положительные, а отрицательные оставляет зделать в турбо поскале пж зделайти ели можно с фото.
Ответы
Автор ответа:
0
program turbo;
uses crt;
var
i,n:integer;
begin
clrscr;
for i: 1 to 3 do
begin
readln(n);
if n>= 0 then
writeln(n,'^2 =',sqr(n));
end;
writeln('press enter');
readln;
end.
Приложения:
Интересные вопросы
Предмет: Технология,
автор: Дашкаалександрова
Предмет: Русский язык,
автор: LikaSweets
Предмет: Русский язык,
автор: elenaktyf2016
Предмет: Математика,
автор: Bat4ka
Предмет: Литература,
автор: vladislava2402190