Задана сторона а1 первого квадрата и сторона другого квадрата а2. Площадь какого квадрата больше?
Паскаль?
да
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.
А если площади будут равны?