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