Предмет: Информатика, автор: mahonyakim

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

Ответы

Автор ответа: dima666ftv
0

Відповідь:

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.

Пояснення:

Похожие вопросы
Предмет: Математика, автор: yzfg9j9khb
Предмет: Литература, автор: suhanovaanna71667