Написать программу в паскале.вычислите объём параллелипипеда со сторонами a, b , c

Var
  a, b, c, v: real;

begin
  writeln('Введите длины сторон a,b,c');
  readln(a, b, c);
  writeln('Объем параллелепипеда: ', a * b * c)
end.