Информатика. Решить через Паскаль, программирование. Вычислить площадь квадрата и площадь прямоугольника. Какая площадь больше?
Program Ploshad
var a,b,c,pk,pp: integer;
begin
writeln(Vvedite dlinu storonykvadrata);
readln(a);
writeln(Vvedite dlinuprjamougolnika);
readln(b);
writeln(Vvedite shirinuprjamougolnika);
readln(c);
pk:=a*a;pp:=b*c;
if pk>pp then
writeln(Ploshad kvadrata bolshe)
else if pp>pk writeln(Ploshadpryamougolnika bolshe)
else writeln(Ploshadi figur ravni);
readln;
end.
Оцени ответ
