non capisco dovrebbe funzionare...
comunque vedo alcuni errori

-uses Crt; si scrive su una sola riga

-TextColor che io sappia prefede solo i numeri corrispondenti ma non i nomi dei colori

-l'ultima istruzione prima dell' end. non ha bisogno del punto e virgola


Per quanto riguarda il problema adesso che ci penso forse il numro all'interno di delay () deve essere messo tra virgolette o apici...
Non mi ricordo ,prova...