CVTG PASCAL

var a, b, c, p:longint;
begin
    assign(input,’cvtg.inp’);reset(input);
    assign(output,’cvtg.out’);rewrite(output);
    read(a, b, c);
    p:=a + b + c;
    write(p);
end.