Delay(prosedur)

Untuk menghentikan sejenak proses program.

Sintaks: DELAY(MS: Word);

MS = ukuran waktu dalam milisecond.

Contoh :

PROGRAM LAYAR;
USES CRT;
VAR 
    x : CHAR;
BEGIN
    CLRSCR;
    GOTOXY(35,10);
    WRITELN('STMIK DUMAI’);
    WRITE(tunggu sebentar...!!');
    DELAY(5000);
    INSLINE;
    GOTOXY(35,11);WRITELN('Top Banget Dech ...');
    GOTOXY(01,13);WRITELN('Tekan Enter !');
    DELAY(1000);
    GOTOXY(15,12);
    DELLINE;
    READ(x);
END.

Hasilnya adalah :

    STMIK DUMAI
    Top Banget Dech ...
tunggu sebentar...!
Tekan Enter !

Last updated

Was this helpful?