Пожалуйста HELP!SoS. Нужна программа по нахождению объёма куба в Pascal ABC

Question

Пожалуйста HELP!SoS. Нужна программа по нахождению объёма куба в Pascal ABC

Comments

const r = 9.5; var V: real; begin V := r * r * r; writeln('Объем куда равен ', V); end.

Answer 1

Var a,b: integer;
begin
write('введите три грани куба : ');
readln(a);
b:=a*a*a;
writeln('объём куба',b);
end.