Как сост программу вычисления объёма куба

Мне тоже я федор 888

V=a^3

 Program Volume;
var 
a:integer;  
Begin
write(' Введите значение: ');
readln(a); 
writeln(' Объём куба равен: ', a*a*a);  
End.