Vaavob
5 год назад
Задано произвольное целое число. Если они больше 50,то уменьшаете его в два раза,в противном случае возвести в квадрат.
ОТВЕТЫ
Десислава
Oct 24, 2020
var
n: integer;
begin
read(n);
if n > 50 then
writeln(n / 2)
else
writeln(n * n)
end.
n: integer;
begin
read(n);
if n > 50 then
writeln(n / 2)
else
writeln(n * n)
end.
647
Смежные вопросы:
