Задано произвольное целое цисло . если оно больше - вопрос №61151650 от Dimoooon12321 17.12.2020 22:08

Question

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

Dimoooon12321 · Answer

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