Составте программу вычисления объема и площади полной поверхности цилиндра с высотой h с радиусом основания r
103
340
Ответы на вопрос:
Const pi = 3.14; var r, h: integer; s, v: real; begin write('введите r= '); readln(r); write('введите h= '); readln(h); s : = 2 * pi * r * (h + r); v : = pi * sqr(r) * h; writeln('площадь равна ', s); writeln('объем равен ', v); readln; end.
Популярно: Информатика
-
GoldTask13.08.2022 12:52
-
адэли1215.01.2022 03:00
-
valya2708198613.04.2020 23:55
-
kikijiijkjk04.03.2021 03:07
-
PashaVershinin21.08.2020 09:09
-
кукареку1802.03.2022 05:33
-
DixonVeit26.08.2021 01:01
-
sifrel9803.03.2020 02:55
-
tailurs09.05.2021 06:38
-
vitakotov00909.11.2022 19:24