Напишите программный код с pascal. задан радиус окружности. найдите площадь и длину c=2пr (п=3.14) - длина окружности s=пr^2 - площадь
147
302
Ответы на вопрос:
var r: real;
begin
write ('введите радиус круга: ');
read(r);
writeln ('площадь круга равна: ', 3.14*sqr(r): 0: 3);
writeln ('длина окружности равна: ', 2*3.14*r: 0: 3);
end.
Популярно: Информатика
-
gkxkfv14.11.2022 01:20
-
Camelia198009.11.2020 15:08
-
Мурмик19.09.2020 07:55
-
karahenov98Алекс14.10.2022 15:15
-
feterina31.08.2021 18:28
-
kklll1g19.04.2023 16:09
-
kceniaart1823.04.2021 10:40
-
alekss8427.07.2022 06:33
-
yanakuznetsova907.02.2020 07:25
-
tinaZ0704.06.2023 06:45