дана длина ребра куба найти площадь грани площадь полной поверхности и объем этого куба. ПАСКАЛЬ!
program kub;
uses crt;
var a:real;
begin
clrscr;
writeln(Введите ребро куба);
readln(a);
writeln(Площадь грани =,a*a);
writeln(Площадь полной поверхности =,a*a*6);
writeln(Объем куба =,a*a*a);
readln
end.
Оцени ответ
