Ответы на вопрос:
Program xx; var r,h,s,v : real; begin writeln('введите значение радиуса основания цилиндра: '); readln(r); writeln('введите значение высоты цилиндра: '); readln(h); v: =pi*r*r*h; s: =2*pi*r*(h+r); writeln('объём цилиндра: ',v); writeln('площадь поверхности цилиндра: ',s); end.
Популярно: Информатика
-
dzhuliya42355555555507.04.2021 18:15
-
миньён924.03.2021 21:46
-
grinevvlad98xuy07.05.2021 06:42
-
неумняшка368568906.01.2023 22:08
-
еренйегер239811.01.2023 16:52
-
sasapanskov30.01.2020 09:22
-
Аляска5611.01.2023 16:38
-
SuperMaksni4ic21.01.2022 23:37
-
2899101714lp19.03.2020 10:18
-
ololsha9914.11.2022 19:09