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

Question

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

lizayka2001 · Answer

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