kod w pascalu, wczytywanie liczb i znaku, wyświetlanie.

Mam coś takiego:

program liczba;

uses crt;

var
x,y :integer;

begin
randomize();
writeln('Podaj X');
read(x);
writeln('Podaj Y');
read(y);
textcolor(random(16));
writeln(x);
textcolor(random(16));
writeln(y);
readln(x);
readln(y);
end.

A muszę zrobić:
"napisz program odczytujacy dwie liczby (x y) i znak,a
nastepnie wypisujacy ten znak na ekranie w punkcie x, y w losowym kolorze."
Mógłby ktoś pomóc?

Oczywiście program nie ma zabezpieczeń przed wpisaniem liter zamiast liczb oraz odwrotnie a także jeżeli program ma być na podstawie jak wyżej to niestety nie zasotosowanie biblioteki graph pozwala tylko na poruszanie sie po x,y (wiersz,kolumna -> znakowo) ...random(16) niestety czarny "kolor" też jest w tym....

mali79: zadano Ci pracę domową do odrobienia, a Ty nie próbujesz nawet jednego wiersza kodu napisać samodzielnie? LEŃ!
marihires: dlaczego bez oporów odrabiasz pracę domową za lenia?

Temat, jako obniżający poziom naszego Forum zamykam.