Question

Помогите с информатикой пожалуйста, желательно с рисунком
Вычислить значения объем куба для значений ребра а равных 0,5; 1; 1,5; 2, ..., 5

Answer 1

var 
a: real;
begin
a := 0.5;
while a <= 5 do
begin
writeln(a*a*a);
a := a + 0.5;
end;
end.