Var a,b,c integer; begin a:=5; b:=a+4; c:=a+b; sum:=a+b+c; sum:=22; end. правильно?
Вроде как да. Правильно