|
24/04/07, 00:59
|
#1
|
Tuğgeneral
Üyelik tarihi: Apr 2007
Bulunduğu yer: VAN
Yaş: 38
Mesajlar: 924
|
su sesi
uses crt;
var
x,i:integer;
begin
randomize;
clrscr;
repeat
i:=i+1;
textcolor(lightgreen);write('II000III000IO');
x:=random(5422);
sound(x);
delay(6);
until keypressed;
nosound;
readln;
end.
|
|
|
Konu Sayısı: 187
Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)
|
|
Yetkileriniz
|
Yeni Mesaj yazma yetkiniz Aktif değil dir.
Mesajlara Cevap verme yetkiniz aktif değil dir.
Eklenti ekleme yetkiniz Aktif değil dir.
Kendi Mesajınızı değiştirme yetkiniz Aktif değildir dir.
HTML-KodlarıKapalı
|
|
|
Bütün Zaman Ayarları WEZ +3 olarak düzenlenmiştir. Şu Anki Saat: 14:27 .
| |