//PascalABC.NET 3.3,сборка 1611 от 06.01.2018
//Внимание! Если программа не работает, обновите версию!
begin
var x:=readinteger('x='); var (a,t):=(0,0.0);
for var i:=0 to x do
begin
a:=i; t:=2*a**2-9*a+(1/2);
Writeln('при а=',a,' ','выражение равно=',t);
end;
end.
В паскале: Inc(n);
В С++: n++;
Налево при x = 1
Направо при x = 21
Ответ: 1, 21
-------------------
Действие y := x + 12 выполнятся не будет вообще, т.к. x должен быть -8, но это число является истинным для первого условия x < 3, поэтому туда программа не пойдет.