Pascal ile ilgilenenlere buyrun

Kodla Büyü

SADETTİN

Seçkin Üye
Seçkin Üye
Mesajlar
334
Pascal Uygulama Örnekleri ( Örnekler eklenmeye devam edilecektir.)

1. Girilen 5 adet sayının ortalamasının üzerindeki sayı değerlerini ekrana yazdırır.
2. 1 den 5 e kadar olan sayıların toplam sonucunu ekrana yazdırır.
3.1 den 10 a kadar olan tek olan sayıları ekrana yazdırır.
4.Girilen 5 adet sayı dizisini ekrana yazdırır.
5.Sayi dizisini büyükten küçüğe sıralayarak ekrana yazdırır.
6.Girilen 3 adet sayının en büyüğünü ekrana yazdırır.
7.Girilen üçgenin kenar değerleri girildiğinde çeşitkenar , eşkenar ya da ikizkenar olup olmadığını kontrol eder ve ekrana yazdırır.
8.Girilen n adet sayinin toplamını ve ortalamasını ekrana yazdırır.
9.Girilen bir notun 5 lik sistemde karşılığını yazdırır.
10.n adet alt alta sadettin yazdırır.
11.6x6 şeklinde w ekrana yazdırır.
12.1 den 5 e kadar sayiları ekrana yazdırır ( Repeat döngüsü kullanılmaktadır)
13.3 adet sadettin ekrana yazdırır. (while döngüsü kullanılmaktadır).
14.2 adet sayinin toplam sonucunu ekrana yazdırır.
15. Açı değerleri girilen üçgenin üçgen olup olmayacağını yazdırır.
16. Girilen n adet sayinin en büyüğünü ekrana yazdırır ( While döngüsü kullanılmaktadır).
17. 3 e kadar olan sayiları ekrana yazdırır. (While döngüsü kullanılmaktadır.)
18. Girilen 3 adet sayının en küçüğünü ekrana yazdırır.
19.1 den 5 kadar olan sayıların karesini ekrana yazdırır.
20.Girilen bir sayının karesini ve karakökünü ekrana yazdırır.
21.Label ve goto fonksiyonların kullanımını gösterir.
22. girilen rakam 5 olana kadar rakamların toplamını ve ortalamasını bulur.
23.Girilen bir sayıya kadar işlemler yapar (While).
24.Upcase örneği ile toplama çıkarma işlemi yapma.
25.Girilen karakteri esc tuşuna basılana kadar programda bırakır.
26.5 rakamı girilinceye kadar rakam okutma işi yapılır.
27.Negatif değer girilinceye kadar sayıları okutur ve en büyüğünü ekrana yazdırır.

Programları indirmek için tıklayınız. (Edit:Link yenilecektir.)
 
Pascal öldü malesef. Benim de favorimdi.
uses crt :puhaha:
 
Ben de zevk olsun diye uğraşıyorum. Ama bütün programlamanın temel mantığı aynı olduğunu zannediyorum.
 
Begin

end

blok yapımız bu muydu? Grafik ekranda çalışmak işkence kelimesinin birebir karşılığıydı :)
 
s_kajmeran' Alıntı:
Begin

end

blok yapımız bu muydu? Grafik ekranda çalışmak işkence kelimesinin birebir karşılığıydı :)

uses crt
var
değişkenler vardı vah vaahh

begin
.
.
.
.
end.
 
s_kajmeran' Alıntı:
Begin

end

blok yapımız bu muydu? Grafik ekranda çalışmak işkence kelimesinin birebir karşılığıydı :)

uses crt;
var
:::::değişken tanımları
begin
::::.program ana bloğu
end.
 
Çok özel bir hobisi olması lazım ilgilenmesi için. Yada dinazor hocaları (öğrenciler için)
 
21 sene evvel siyah ekranda database 3 plus ile rehber yapiyorduk.bilgisayara ne istersek yaptirirdik
 
pascalın meslek hayatımdaki yeri bir başkadır.. o benim ilk göz ağrım... hala seviyorum pascalı.. :)
 
Geri
Üst