Напишите на паскале программу, вычисляющую длину окружности, площадь круга одного и того же радиуса по формулам: c = 2 пр, s=пр²

Question

Информатика

Дарина

16 октября, 03:44

Напишите на паскале программу, вычисляющую длину окружности, площадь круга одного и того же радиуса по формулам: c = 2 пр, s=пр²

+2

Ответы (1)

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

Алинка · Answer 1

Var l, r, s:integer;

begin

write ('Введите радиус:') ; readln (r) ;

l:=2*pi*r;

s:=pi*sqr (r) ;

writeln ('Длина окружности = ', l:2:2) ;

writeln ('Площадь круга = ', s:2:2) ; readln;

End.