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

Var a, b, c, s:word;

BEGIN
Writeln('Vedit pershe chislo');
Readln(a);
Writeln('Vedit druge chislo');
Readln(b);
Writeln('Vedit trete chislo');
Readln(c);
S:=2*(a*b+b*c+a*c);
writeln('plocha');
writeln(s);
readln;
END.

Перевірка
Вхід 8 9 10
Вихід 484