Subiectul al II-lea, 2.

Variabilele i și k sunt de tip întreg, iar toate celelalte variabile sunt de tip char. Scrieți ce se afișează în urma executării secvenței alăturate. (6p.)

c1:='A'; c2:='N'; for i:=0 to 7 do begin if i=2 then begin k:=-1; c:=c1; c1:=c2; c2:=c end else if i>4 then k:=0 else k:=1; if i mod 2=0 then c:=chr(ord(c1)+k) else c:=chr(ord(c2)+k); write(c) end;