Question

program parallelipiped var a,b,c integer var V,S: real begin
a:= 6
b:= 3
c:=9
V:=a*b*c
S:=2*(a*b+b*c+a*c)
writeln (V)
writeln (S)
end
очень срочно!!!!!!​