Даны 2 числа возвести в квадрат первое число если оно больше второго в противном случае найти их сумму

rage13371 rage13371    3   11.11.2019 10:01    4

Ответы
virabasusta virabasusta  27.08.2020 16:21

var a,b:Integer;

begin

Write('Введите первое число ');

ReadLn(a);

Write('Введите второе число ');

ReadLn(b);

if a>b then Write('Первое число больше второго и его квадрат равен ',a*a)

else Write('Первое число не больше второго и сумма чисел равна ',b+a)

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика