Предмет: Информатика,
автор: mahonyakim
Найти длину окружности L и площадь круга S заданного радиуса R: L = 2·π·R, S = π·R2. В качестве значения π использовать 3.14.
Ответы
Автор ответа:
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
Предмет: Химия,
автор: vinogradovasasa40
Предмет: Українська мова,
автор: haker777900
Предмет: Другие предметы,
автор: yanatyan75