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

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

Question

Епифан

9 ноября, 07:46

+4

Ответы (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. Какая из фигур имеет большую площадь?