Ввести 2 числа с клавиатуры если первое число больше второго то вывести на экран квадрат первого иначе квадрат второго
Program A;
var x,y:integer;
begin writeln(Введите два числа:); readln(x); readln(y); if x > y then writeln(x * x) else writeln(y*y);end.
Оцени ответ
