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

Задание:

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

Решение:

Program lol; var a,v,s: real; beginreadln (a); v: =a*a*a; s: =a*a*6; writeln ('обьем куба=',v); writeln ('площадь поверхности куба=',s); end.

Знаете другой ответ?

Отправить свой ответ