Написать программу на языке Паскаль.

Известна сторона квадрата А и радиус круга R. Какая из фигур имеет большую площадь?

Question

Колюня

26 декабря, 02:54

+1

Ответы (1)

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

Эдит · Answer 1

Var a, r:real;

begin

read (a, r) ;

if (a*a>pi*r*r) then writeln ('Квадрат')

else if (a*a
else writeln ('Площади равны') ;

end.

Написать программу на языке Паскаль.Известна сторона квадрата А и радиус круга R. Какая из фигур имеет большую площадь?