Паралелепіпед

Складіть програму обчислення площі поверхні паралелепіпеда (S=2*(a*b+b*c+a*c)).

program poverhnya_paraieiepipeda;
uses crt;
Var a,b,c,s: word;
BEGIN
a:=5;b:=8; c:=6; s:= a*b*c;
writeln (' poverhya paralelepipeda =',s,'kv.sm.');
END.
Вхід a:=5;b:=8; c:=6; s:= a*b*c;
Вихід 240
Вхід a:=7;b:=8; c:=5; s:= a*b*c;
Вихід 280