Найдите квадрат наибольшего из чисел a и b. Введите результат сравнения на экран. Записать программу на языке паскаль

Question

Семион

20 августа, 03:10

+1

Ответы (1)

Знаешь ответ?

Демид · Answer 1

Program n1;

var a, b: real;

begin

write ('введите а и b: ');

readln (a, b);

if a
if a>b then writeln ('наибольшее a; квадрат: ', a*a);

end.