Написать программу вычисления объема куба. v=a в третьей степени, а - сторона

Var a, V: integer;
begin
  write('a = ');
  readln(a);
  V := a * a * a;
  write('V = ', V);
end.