Найдите площадь прямоугольного параллелепипеда, если длинны его рёбер a, b, c вводятся с клавиатуры. s=2*c*(a+b)

Program bvc;
var a,b,c,s:integer;
begin
writeln('vvedite a,b,c');
readln(a,b,c);
s:=2*c*(a+b);
writeln('s=',s);
end.