Şimdi Ara

PASCAL, yaparsam 100 alıcam lütfen

Daha Fazla
Bu Konudaki Kullanıcılar: Daha Az
1 Misafir - 1 Masaüstü
5 sn
3
Cevap
0
Favori
326
Tıklama
Daha Fazla
İstatistik
  • Konu İstatistikleri Yükleniyor
Öne Çıkar
0 oy
Sayfa: 1
Giriş
Mesaj
  • hocamız dediki yaptığınız program sadece esc ye basınca çıkacak ve esc harici bir tuşa bastığımızda 0 dan başlayıp her bastığımızda 1 artacak fakat hoca bunu repeat until döngüsüyle yapmammızı istedi bende repeat until döngüsünde sayacın nerde kullanıldığını bilmiyorum acil yardımlarınızı bekliyorum

    uses crt;
    var
    tus: char;
    begin
    clrscr;
    repeat
    writeln('Esc tusuna basin...');
    tus:=readkey;
    until tus=#27;
    end.

    şu programı yaptım sadece sayac eklenecek ve esc harici herhangi bir tuşa basınca 1 artacak

    sayac ekleyip bana yardım edermisiniz

    bi nevi kronometre gibi



    < Bu mesaj bu kişi tarafından değiştirildi bala5252 -- 18 Nisan 2012; 18:38:57 >



    _____________________________
  • PASCAL hiç bilmiyorum ama öncelikle bir sayac degiskeni tanimlarsin daha sonra tus:=readkey; satırının altında bu değişkeni bir artırırsın muhtemelen böyle olmalı.
    _____________________________
  • pascali geçen yıl görmüstüm tam olarak hatirlamiyorum ama
    bence bir if cümlesi kurman lazim
    if tus=#27 then .....
    else sayac=sayac+1 gibi bir değiskenle yapabilirsin
    _____________________________
  • Yapay Zeka’dan İlgili Konular
    Daha Fazla Göster
    
Sayfa: 1
- x
Bildirim
mesajınız kopyalandı (ctrl+v) yapıştırmak istediğiniz yere yapıştırabilirsiniz.