Valaki segítene nekem megírni ezt a programot FreePascalba?

Készítsünk programot, amely bekér egy N természetes számot, majd kirajzol a képernyőre egymás mellé N-szer az "XO" betűket és a kiírás után a kurzort a következő sor elejére teszi.

Például N=3-ra kiírja ezt a program:

XOXOXO

Egészítsük ki az előző programunkat úgy, hogy az előző kiírás alá írja ki N-szer az "OX" betűket is egymás mellé, majd a kurzort ismét a következő sor elejére tegye. (Az előző ciklus után - NE bele a ciklusba! - tegyünk egy hasonló ciklust, ami most XO helyett OX betűket ír ki.)

Például N=3-ra kiírja ezt a program:

XOXOXO

OXOXOX

Egészítsük ki a programunkat úgy, hogy az előző két sort N-szer ismételje meg a program. (Az előző két egymás utáni ciklust tegyük bele egy külső ciklusba.)

Például N=3-ra kiírja ezt a program:

XOXOXO

OXOXOX

XOXOXO

OXOXOX

XOXOXO

OXOXOX