Составить программу на языке паскаль! даны длины ребер a, b, c прямоугольного параллелепипеда. найти его объем v = a·b·c и площадь поверхности s = 2·(a·b + b·c + a·c).

Var a,b,c,v,s : real;
begin
writeln('Vedite a b c');
readln(a,b,c);
v:=a*b*c;
s:=2*(a*b+b*c+a*c);
writeln('V=',v,' S=',s);
end.