Определите, что будет напечатано в результате выполнения следующего алгоритма:
Var a,b,i: integer;
begin
a:=5;
b:=1;
for i:=1 to 10 do
b:=a-i;
If a-b<6 then a:=b-2*a</span>
else a:=2*b-a
end;
writeln(a)
end.
Результат будет число -88