Что будет выведено на экран после выполнения фрагмента программы?
...
begin
a:=1; b:=2;
if (a>=1) and (b>=2) then n:=a+b else n:=a-b;
writeln (n);
end.