Ответы на вопрос:
Var a,b,c: real; begin write('длина = '); readln(a); write('ширина = '); readln(b); write('высота = '); readln(c); writeln('площадь полной поверхности = ',2*(a*b+b*c+c*a)); writeln('объём = ',a*b*c) end.
Популярно: Информатика
-
YourselfRuelfddd01.08.2020 15:54
-
dhwaaо26.12.2020 09:40
-
SonyaNexoda27.03.2021 21:43
-
хома7926.04.2022 00:00
-
соня787126.07.2020 14:31
-
lambert133702.07.2021 23:49
-
аленаzm27.04.2020 17:21
-
lzhaleeva02.10.2021 08:44
-
boha329.12.2020 11:42
-
alinatrocenko31.07.2022 09:09