Question

найти сумму трёх чисел (работать в паскале)...

Answer 1

var
   a, b, c, s: integer;
begin
   readln(a, b, c);
   s := a+b+c;
   writeln(s);
end.

Answer 2

program писать не обязательно, можно сразу с var.

Answer 3

Но не обязательно, достаточно того, что написал