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

NastysikRicci NastysikRicci    3   11.08.2019 18:10    4

Ответы
ааааааспасите ааааааспасите  04.10.2020 11:49
Var a,b:integer;
begin
writeln('Введите два числа:');
readln(a,b);
if (a>b)
 then writeln(a,' > ',b,', ',a,'^2=',a*a)
 else writeln(b,' > ',a,', ',b,'^2=',b*b);
end.

Пример:
Введите два числа:
5 8
8 > 5, 8^2=64
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика