Elakadtam. Mi a hiba ebben a programozásban?

Ez a feladat:

Változók:

V:logikai

I:egész

J:egész

Program eleje

V := igaz

Ciklus i:=1-től 8-ig 1-esével

Ha i páratlan szám akkor V:= igaz

különben V:= hamis

elágazás vége

Ciklus j:=1-től 8–ig 1–esével

Ha V akkor KI(„A”)

különben KI(„B”)

elágazás vége

V := NEM(V)

Ciklus vége

KI(új_sor)

Ciklus vége

Program vége

Ezt így írtam át, már ameddig eljutottam bár lehetséges, hogy nem jó:

Program ujsor;

Uses Crt;

Var V:boolean;

I,J:integer;

Begin

V:=true;

for i:=1 to 8 do

begin

if (i mod 2)>0 then v:=true

else v:=false;

end;

for j:=1 to 8 do

begin

if (i mod 2)>0 then v:=true

writeln('A');

else writeln('B');