Даны длины сторон прямоульного параллелепипеда. Найти его обьём и площадь боковой поверхности.(PaskalABC)

program z1;

var a,b,c: real;

begin

write ('a = ');

readln(a);

write ('b = ');

readln(b);

write ('c = ');

readln(c);

writeln('V = ',a*b*c);

writeln('S = ',2*(a*b + a*c))

end.

картинка