Yetkinforum.com | ©phpBB | Bedava yardımlaşma forumu | Suistimalı göstermek | Ücretsiz blog
ForumAlem

ForumAlem
 
AnasayfaAnasayfa  SSSSSS  AramaArama  Üye ListesiÜye Listesi  Kullanıcı GruplarıKullanıcı Grupları  Kayıt OlKayıt Ol  Giriş yapGiriş yap  

Paylaş | 
 

 Pascal'da 30 dakika devam eden program

Önceki başlık Sonraki başlık Aşağa gitmek 
YazarMesaj
ToPrAk
Admin
Admin
avatar

Mesaj Sayısı : 457
Kayıt tarihi : 05/08/08
Yaş : 28
Nerden : KONYA

MesajKonu: Pascal'da 30 dakika devam eden program   Cuma Ağus. 08, 2008 5:48 pm

uses crt;
var a,b,c,d : numerator;
begin
numerator:=-9999;
repeat
for a:=-9999 to 9999 do begin
for b:=-9999 to 9999 do begin
for c:=-9999 to 9999 do begin
for d:=-9999 to 9999 do ch:=readkey;
end;
end;
end;
inc(numerator);
until numerator=9999
Sayfa başına dön Aşağa gitmek
Kullanıcı profilini gör
 
Pascal'da 30 dakika devam eden program
Önceki başlık Sonraki başlık Sayfa başına dön 
1 sayfadaki 1 sayfası

Bu forumun müsaadesi var:Bu forumdaki mesajlara cevap veremezsiniz
ForumAlem :: Programlama Dilleri :: PascaL-
Buraya geçin: