Pascal – język programowania
Pakiet CRT
Wywołanie pakietu  po nazwie programu  poleceniem   uses crt;
a) instrukcja czyszcząca ekran -   clrscr     (clear screen)
b) instrukcja opóźnienia w programie - delay(80) -  liczba w nawiasie jest czasem zwłoki w milisekundach
c) barwa liter  - TextColor(4) – liczba w nawiasie oznacza określony kolor (np.  0-czarny, 1-niebieski, 2- zielony, 3-cyjan, 4-czerwony , 5-magenta, 6-brązowy , 7-biały)
d) ustawienie pozycji kursora na ekranie GotoXY(20,10)  liczby w nawiasie to współrzędne ekranu x i y z tym, że punkt (0,0) to górny lewy róg ekranu
e) instrukcje dźwiękowe   Sound (200) - wywołanie dźwięku o określonej w nawiasie częstotliwości w Hz  i  Nosound - odwołanie dźwięku.
Jeżeli umieścimy te instrukcje jedna po drugiej to nie usłyszymy dźwięku, bo zaraz po wywołaniu zostanie on odwołany. Chcąc usłyszeć go trzeba mu dać szansę trwania  choć przez chwilę a więc:
sound(200);
delay(500);
nosound;
taki ciąg instrukcji spowoduje, że dźwięk o częstotliwości 200 Hz będzie wytwarzany przez pół sekundy

Przykładowy program do wykonania z tymi instrukcjami:

program kolor;
uses crt;
var
Zosia, Janek, P : integer;

begin
clrscr;								czyszczenie ekranu
textcolor(4);							wywołanie czerwonego koloru
writeln('Program obliczający pole prostokąta');
textcolor(7);							wywołanie białego koloru
writeln('Podaj długość dłuższego boku w cm') ;
readln(Zosia);
writeln('Podaj długość krótszego boku w cm');
readln(Janek);
P:=Zosia*Janek ;
sound (600);
delay(500);
nosound;
writeln('Pole kwadratu jest równe ',P,' cm2');
delay(1000);							opóźnienie  - o ile ?
end.