Дана длина ребра куба. Найти площадь грани, площадь полной поверхности и объем куба

паскаль

Question

Информатика

Риммич

12 февраля, 01:06

Дана длина ребра куба. Найти площадь грани, площадь полной поверхности и объем куба

паскаль

+4

Ответы (1)

Знаете ответ на вопрос?

Ионка · Answer 1

Var A:real;

Begin

Write ('Ребро куба = ') ; ReadLn (A) ;

WriteLn ('S грани = ', A*A) ;

WriteLn ('S полной поверхности = ', A*A*6) ;

WriteLn ('V куба = ', A*A*A)

End.

Дана длина ребра куба. Найти площадь грани, площадь полной поверхности и объем кубапаскаль

Дана длина ребра куба. Найти площадь грани, площадь полной поверхности и объем куба

паскаль