Задана сторона а1 первого квадрата и сторона другого квадрата а2. Площадь какого квадрата больше?

Question

Информатика

Зосима

18 июля, 22:09

Задана сторона а1 первого квадрата и сторона другого квадрата а2. Площадь какого квадрата больше?

+4

Ответы (1)

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

Машуня · Answer 1

Var

a1, a2:integer;

begin

writeln ('Введите а1') ;

read (a1) ;

writeln ('Введите а2') ;

read (a2) ;

a1:=sqr (a1) ;

a2:=sqr (a2) ;

if a1>a2 then

writeln ('Площадь а1 больше')

else

writeln ('Площадь а2 больше') ;

end.