Задано произвольное целое цисло . если оно больше - вопрос №61061450 от victoria223 08.03.2023 16:33

Question

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

victoria223 · Answer

var a:integer;beginreadln(a);if a 50 thena:=a/2;else a:=a*a;Writeln(a);end....