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

Question

Владилен

8 апреля, 23:12

+3

Ответы (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.