Monthly Archive:: Mayıs 2009
Pascal Örnekleri 14 (Diziler)
DİZİ (ARRAY) Girilen 4 sayıdan büyük olanı ve küçük olanı bulan program Uses Crt; Var i,buyuk,kucuk:integer;
7/5/2009
3Pascal Örnekleri 13 (Length, Type, While)
LENGTH Girilen bir kelimeyi alfabetik sıraya göre yazan program uses crt; var deg,cumle:string[30];
7/5/2009
0Pascal Örnekleri 12 ( AscII tablosu ve Faktoriyel)
Ascii Karakter Tablosu uses crt; var a:integer; i:byte;
7/5/2009
0
Pascal Örnekleri 11 ( Karma örnekler)
85)Procedure ile kullanılan klavyeden girilen koordinatlara göre şekli çizen pogram. Çöz:85)uses crt; var a,b,c,d,i:integer; procedure sekil;
7/5/2009
1Pascal Örnekleri 10 (Fibonacci sayıları, Asal sayılar, Basamaklara ayırma)
79)Fibonacci sayılarını yazan program. Çöz:79)uses crt; var i,s:integer; n,a,t1,t2,t3:longint; begin
7/5/2009
1Pascal Örnekleri 19 (Sınav kağıdını dolduran program)
78) Ad soyad, numara, bölüm girişi yapılarak sınav kağını dolduran program. Çöz:78)uses crt; var numa,turdogru,turyanlis,turbos,matdogru,matyanlis, matbos,j:integer;
7/5/2009
2Pascal Örnekleri 9 ( Sayısal Loto, Pascal Üçgeni, Hesap Makinesi)
74)Sayısal loto programını kullanıcının belirlediği kolon sayısına göre yapan program. Çöz:74)uses crt; var i,a,x,kolon:integer; begin clrscr;
7/5/2009
2Pascal Örnekleri 8 ( Sayı tabanları, Şifre programları)
71)Onluk (decimal) sayı sitemini ikilik (binary) sayı sistemine çeviren program. Çöz:71)uses crt; var i,say,sayi1:integer; begin clrscr;
7/5/2009
0Pascal Örnekleri 7 ( Bloklu yazım örnekleri )
65) 3 blok halinde 12*42=21*24 şeklindeki eşitliği yazan program. Çöz:65)uses crt; var i,j,a,b,c,d,e,f,sayac:integer; begin clrscr;
7/5/2009
0Pascal Örnekleri 6 ( Mükemmel Sayılar, Asal sayılar, Biraz oyun yapalım.)
60)100’den 999’a kadar olan mükemmel sayılar. Çöz:60)uses crt; var on,i,a,b,c:integer; begin clrscr;
7/5/2009
9