Question

последнюю задачу с кубом решите пожалуйста

Answer 1

var

 a: real;

 

begin

 Write('Укажите длину ребра куба: ');

 Readln(a);

 Writeln('Объем куба равен ', a * a * a)

end.