Найти длину окружности L и площадь круга S заданного радиуса R:

L = 2·π·R, S = π·Rв квадрате

В качестве значения π использовать 3.14.

В PascalABC

Question

Информатика

Володюка

13 апреля, 09:37

Найти длину окружности L и площадь круга S заданного радиуса R:

L = 2·π·R, S = π·Rв квадрате

В качестве значения π использовать 3.14.

В PascalABC

+3

Ответы (1)

Знаете ответ на вопрос?

Степа · Answer 1

Var l, s, p, r:real;

begin

writeln ('Введите радиус') ;

read (r) ;

p:=3.14;

l:=2*p*r;

s:=p*sqr (r) ;

write ('Длина окружности равна ', l,' так же площадь круга равна ', s) ;

end.

Найти длину окружности L и площадь круга S заданного радиуса R:L = 2·π·R, S = π·Rв квадратеВ качестве значения π использовать 3.14.В PascalABC

Найти длину окружности L и площадь круга S заданного радиуса R:

L = 2·π·R, S = π·Rв квадрате

В качестве значения π использовать 3.14.

В PascalABC