Var a,b,c integer;
begin
a: = 5;
b: = a+4;
c: = a+b;
sum: = a+b+c;
sum: = 22;
end.

правильно?