Даны длины ребер a, b, c прямоугольного параллелепипеда. Найти его объем

program zz1;

var
a, b,c,V,S: integer;

begin
writeln(Введите сторону а); //вводим первую сторону параллелепипеда
read(a);
writeln(Введите сторону b); //вводим вторую сторону параллелепипеда
read(b);
writeln(Введите сторону c); //вводим третью сторону параллелепипеда
read(c);
V:=a*b*c; //объем параллелепипеда
S:=2*(a*b+a*c+c*b); //обретаем площадь поверхности параллелепипеда
writeln(Объем параллелепипеда = ,V);
writeln(Площадь поверхности параллелепипеда = ,S); //Выводим ответ
end.