ada permintaan dari seorang teman yang menginginkan sesuatu yang bisa berjalan pada pemrograman pascal.
contoh dibawah ini masi sangat sederhana....
program coba;
uses crt;
var
i : integer;
begin
clrscr;
for i := 5 to 25 do
begin
gotoxy (i,7); writeln('saya dea');
delay(1000);
end;
readln;
end.
'saya dea' bisa diganti menjadi apa saja..
any questi...
