Question

дана длина ребра куба найти площадь грани площадь полной поверхности и объем этого куба. ПАСКАЛЬ!

Answer 1

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.