Задано произвольное целое число. если они больше - вопрос №507736075 от 6yterffjdjd 14.08.2020 03:39

Question

Информатика: Задано произвольное целое число. если они больше 50,то уменьшаете его в два раза, в противном случае возвести в квадрат.

6yterffjdjd · Answer

Var    n: integer;begin    read(n);    if n 50 then        writeln(n / 2)    else        writeln(n * n)end....