|
PASCAL ÖRNEKLERİ
1- İki Sayının Toplamı
2- İki sayının kareleri toplamı
3- İki sayıdan büyüğünü bulma
4- Verilen üç sayıyı büyükten küçüğe sıralama
5- Verilen üç sayıdan büyüğünü bulma
6- Verilen sayının 2 katını 5 fazlasının yarısını hesaplama
7- Üçgenin çevresini hesaplama
8- Çemberin Çevresini Hesaplama
9- Dikdörtgenin çevresini hesaplama
10-Verilen sayının tek veya çift olup olmadığını belirleme
11-Renkleri görüntüleme
12-Faktöryel Hesaplama
13-while döngüsüne örnek
14-repeat döngüsüne örnek
15-Günleri görüntüleme
16-N Elemanlı bir dizi elemanlarını okutma ve yazdırma
17-N elemanlı bir dizinin her elemanının karesi ile karekökü toplamından oluşan yeni diziyi yazdırma
18-N elamanlı bir dizinin elemanlarını büyükten küçüğe sıralama
19-N elemanlı bir dizinin elemanlarının karekökleri toplamı
20-N elemanlı bir dizinin elemanlarının 2 katından oluşan yeni diziyi yazdırma
21-II Dereceden bir bilinmeyenli denklemin kökünü bulma
22-NxN tipindeki bir diziyi matris görüntüsünde okutma
23-N Elemanlı bir dizinin elemanları toplamını yazdırma
24-Klavyeden girilen sayıya kadar olan pozitif tamsayıların toplamı
25-Azalan Döngü Örneği
26-If - Else Komutuna örnek uygulama (not ortalaması ve Harf notu)
27- NxN tipindeki iki matrisin çarpımı
28-Dizi, Döngü ve Faktöryel uygulaması
29-NxN tipindeki bir dizinin 3 katından oluşan diziyi ekrana yazdırma
30-Sayıların kareleri toplamı
31-Bir dizinin elemanlarının kareleri toplamı
32-Vize Notunun %40 ile Final Notunun % 60 nın toplamı
33- Üç sayının aritmetik ortalaması
34-İki sayının karekökü ile karesinin toplamı
35-NxN tipindeki iki dizinin toplamı
36-NxN tipindeki bir dizinin köşegen elemanlarının toplamı
37-NxN tipindeki iki matrisin çarpımı
38-NxN Tipindeki matrisin elemanları toplamı
39-N Elemanlı bir dizinin Aritmetik ortalaması
40-Txt Dosyası oluşturma ve Kayıt işlemi
41-Rehber1.txt dosyasından veri okuma
42-Rehber1.txt dosyasına ver kayıt etme işlemi
Yukarıda listesi belirtilen örneklerin örnek_1.pas ,ornek_2.pas isimlendirmesi ile aşağıda belirtilen linkten dosyayı indirebilirsiniz.
> |