ÜYELERİMİZİN VE ZİYARETÇİLERİMİZİN SİTEMİZE DOSYA VE DÖKÜMAN EKLEMESİ ÖNEMLE RİCA OLUNUR. AYRICA İSTEYEN ÜYELERİMİZ SİTEMİZDE MODERATÖR OLABİLİRLER . TEŞEKKÜRLER...
Content Top

Hukuki desteklerinden ötürü Karakum Avukatlık Bürosunun kurucusu Av. Mustafa KARAKUM 'a şükranlarımı sunarım. TEŞEKKÜRLER...
Gönder 
 
Değerlendir:
  • 0 Oy - 0 Yüzde
  • 1
  • 2
  • 3
  • 4
  • 5
turbo pascal soru örnekleri
Yazar Mesaj
daisy Çevrimdışı
Moderator
*****

Mesajlar: 2,011
Üyelik Tarihi: Aug 2010
Rep Puanı: 66
Mesaj: #1
turbo pascal soru örnekleri
SORU 1-) Ekrandan girilen 3 adet sayıdan en büyüğünü bulan Pascal programını yazınız.
CEVAP-1)
uses crt;
var
a,b,c,enb:longint;
begin
clrscr;
write('1.sayI:');readln(a);
enb:=a;
write('2.sayI:');readln(b);
if b>enb then enb:=b;
write('3.sayI:');readln©;
if c>enb then enb:=c;
write('En Büyük Sayı :',enb);
readln;
end.

SORU 2-) Klavyeden girilen 10 adet sayının en büyük ve en küçük toplamını ve farkını veren Pascal programını yazınız.
CEVAP-2)
uses crt;
var
sayi:array[1..10] of longint;
enk,enb,i:longint;
begin
clrscr;
enb:=sayi[1];enk:=sayi[i];
for i:=1 to 5 do begin
write(i,'.sayı:');readln(sayi[i]);
if sayi[i]<enk then enk:=sayi[i];
if sayi[i]>enb then enb:=sayi[i];
end;
write('TOPLAMLARI :',enb+enk);
write('FARKLARI :',enb-enk);
readln;
end.

SORU 3-) Klavyeden girilen 50 adet sayının ortalamasından küçük olan sayıların ortalamasını hesaplayan Pascal P.yazınınz.
CEVAP-3)
uses crt;
var
sayi,o_k:array[1..10] of longint;
topl,topl1,i:longint;
ort,ort1:real;
begin
clrscr;
topl:=0;topl1:=0;j:=0;
for i:=1 to 10 do begin
write(i,'.sayı:');readln(sayi[i]);
topl:=topl+sayi[i];
end;
ort:=topl/10;
writeln('Sayıların ortalaması:',ort:2:2);
for i:=1 to 10 do begin
if sayi[i]<ort then begin j:=j+1;o_k[j]:sayi[i]; topl1:=topl1+sayi[i];end;
ort1:=topl1/j;
writeln('Ortalamadan küçük sayıların ortalaması:',ort1:2:2);
readln;
end.

SORU 4-) BİLGİSAYAR ifadesini V şeklinde yazdıran Pascal Programını yazınız.
CEVAP-4)
uses crt;
var
i:byte;
mesaj:string;
begin
clrscr;
Mesaj:='BILGISAYAR';
for i:=1 to 25 do begin
gotoxy(i,i);write(Mesaj);
gotoxy(69-i,i);write(mesaj);
end;
readln;
end.





SORU 1-) Bir ağacın boyu 1 metre olup, her sene boyunun %2 si kadar uzamaktadır. 100 yıl sonra boyunun kaç metre olacağını hesaplayan T.P. programını yazınız.
SORU 2-) Şifre olarak “BLGS” girildiğinde girilen şifreyi herhangi bir tuşa basılıncaya kadar soldan-sağa, sağdan-sola kaydıran T.P. programını yazınız.
SORU 3-) Girilen seçime göre, sayının değerini bir arttıran veya bir azaltan, her seferinde ekrana yazan ve “ESC” tuşuna basılıncaya kadar bu işlemi tekrarlayan T.P. programını yazınız.
SORU 4-) Bir işletmede çalışan elamanlara normal ücretlerine ek olarak ürettikleri parça sayısına göre aşağıda belirtilen şartlara göre ek ücret verilmektedir.
0 – 10 arası parça başına 5000 10 – 30 arası parça başına 8000 30 ve daha yukarısı için parça başına 5000
Buna göre normal maaşı ve ürettiği parça sayısı bilgilerini alarak her eleman için ayrı ayrı alacağı toplam ücreti hesaplayan T.P. programını yazınız.
*** Her soru 25 puan süre 80 dakikadır.***

http://www.jetnetworking.com.tr/index.ph...e/JN125973
Her Üye Kaydına 20 TL. Kazan!!!
jetnetworking üyelik için linki tıklayıp bilgilerinizi girin
sistem hakkında


bir teşekkürü çok görmeyin!
10-22-2010 20:53
Tüm Mesajlarını Bul Alıntı Yaparak Cevapla
« Önceki | Sonraki »
Cevapla 


Benzeyen Konular
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
Rainbow TEKNİK ve MESLEK RESİM 1.DÖNEM 1.YAZILI SORU VE CVP daisy 1 4,217 12-23-2010 0:09
Son Mesaj: ahmetesin
  Açık Kaynak İşletim Sistemleri 2.Dönem 2.yazılı Soru ve Cevapları 1 daisy 0 2,157 11-29-2010 13:01
Son Mesaj: daisy
  İŞLETİM SİSTEMLERİ TEMELLERİ MODÜLÜ DEĞERLENDİRME SINAVI SORU VE CEVAPLARI daisy 0 2,697 11-29-2010 12:59
Son Mesaj: daisy
  2010-2011 bilişim teknolojilerinin temelleri 1. dönem 1. yazılı soru ve cevap anahtar daisy 0 1,359 11-25-2010 21:25
Son Mesaj: daisy
  turbo c cevap anahtarları daisy 0 1,036 10-22-2010 21:01
Son Mesaj: daisy
  vb soru örnekleri daisy 0 795 10-22-2010 20:59
Son Mesaj: daisy
  Autocad soru örnekleri daisy 0 6,918 10-22-2010 20:55
Son Mesaj: daisy
  turbo c soru örnekleri daisy 0 1,663 10-22-2010 20:48
Son Mesaj: daisy
Star AÇIK LİSE İşlemcinin Modülü sınavı soru ve cevapları daisy 0 1,482 10-20-2010 20:49
Son Mesaj: daisy
Big Grin Disk Sürücüleri ve Donanım Kartları Modülü sınavı soru ve cevapları daisy 0 2,993 10-20-2010 20:47
Son Mesaj: daisy

Konu ile Alakalı Anahtar Kelimeler

turbo pascal soru örnekleri indir, turbo pascal soru örnekleri Videosu, turbo pascal soru örnekleri online izle, turbo pascal soru örnekleri Bedava indir, turbo pascal soru örnekleri Yükle, turbo pascal soru örnekleri Hakkında, turbo pascal soru örnekleri nedir, turbo pascal soru örnekleri Free indir, turbo pascal soru örnekleri oyunu, turbo pascal soru örnekleri download

  • Paylaş
  • Yazdırılabilir Sürüm
  • Bu Konuyu Arkadaşına Gönder
  • Konuya Abone Ol
Forum'a Git:


Konuyu görüntüleyenler: 1 Misafir

Zaman: 12-23-2014, Saat: 6:20

Türkçe Çeviri: MyBB Türkiye
Üretici: MyBB, © 2002-2014 MyBB Group.


sınıf , kitap cevapları sınıf , kitap cevapları