[PASCAL] Wyświetlić na ekranie prostokąty w różnym kolorze

Witam, chciałbym wyświetlić na ekranie 2 prostokąty w różnym kolorze (np jeden czerwony a drugi zielony) korzystając tylko z modułu crt oraz funkcji window(x1,y1,x2,y2) i textbackground(colour). Czy mógłby mi dać ktoś jakąś wskazówkę, albo napisać kod? Tylko chodzi mi o jednoczesne wyświetlenie obu prostokątów.

Dziękuję za pomoc :slight_smile:

window(1,1,10,5);textbackground(BLUE);clrscr;window(12,1,25,8);textbackground(GREEN);clrscr; [/code]

ok dzięki, tylko potem trzeba pamiętać żeby na zakończenie programu napisać jeszcze jedno textbackground(black) :slight_smile: