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

Program pizma;
var a,b,c,v,sp,sb:real;
begin
read(a);
read(b);
read(c);
v:=a*b*c;
sb:=4*с*(a+b);
sp:=2*(a*b+b*c+a*c);
write('объем=',v,' площадьSb='sb,' и SP=',sp);
end.