Как известно площадь круга рассчитывается по формуле s=пr 2. составьте программу нахождения и вывода на экран значения площади круга, если значение радиуса задается с клавиатуры

Question

Анисья

14 октября, 14:36

+2

Ответы (1)

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

Федяка · Answer 1

Var r, s:real;

begin

write ('R = ');

readln (r);

s:=2*pi*r*r; writeln ('Площадь круга = ', s:6:3);

end.

Пример:

R = 2

Площадь круга = 25.133