İçeriğe geç

Kitaplar / Yöntem ile Programlamaya Giriş / Bölüm 4 — Karar vermek: eğer ve değerine göre

Bölüm 4 — Karar vermek: eğer ve değerine göre

Programlar koşullara göre farklı yollar izler. eğer koşul ise A değilse B yapısı koşul doğruysa A’yı, değilse B’yi çalıştırır. Koşul mutlaka mantıksal bir değer olmalıdır.

Yöntem
program NotHesabı
değişken
  puan: tamsayı
  harf: metin
başla
  yaz('Sınav puanı (0-100): ')
  oku(puan, 1)

  eğer (puan < 0) veya (puan > 100) ise
    yaz('Geçersiz puan!', 1)
  değilse eğer puan >= 85 ise
    harf := 'AA'
  değilse eğer puan >= 70 ise
    harf := 'BB'
  değilse eğer puan >= 50 ise
    harf := 'CC'
  değilse
    harf := 'FF'

  eğer harf <> '' ise
  başla
    yaz('Harf notu: ' + harf, 1)
    yaz(eğer harf = 'FF' ise 'Kaldınız.' değilse 'Geçtiniz!', 1)
  bitir
bitir.
Çıktı
Sınav puanı (0-100): 77
Harf notu: BB
Geçtiniz!

Bu programdan çıkarılacak dersler şunlardır:

Bir değeri seçeneklere göre ayırmak: değerine göre

Tek bir değerin pek çok olası durumu varsa x değerine göre … bitir yapısı daha okunaklıdır. Etiketler tek değer (1:), virgülle liste (6, 7:) ya da aralık (1..5:) olabilir. Hiçbir etiket tutmazsa değilse: kolu çalışır.

Yöntem
program Günler
değişken
  gün: tamsayı
başla
  1'den 7'ye kadar her gün için
  başla
    yaz(gün + ': ')
    gün değerine göre
      1: yaz('Pazartesi')
      2: yaz('Salı')
      3: yaz('Çarşamba')
      4: yaz('Perşembe')
      5: yaz('Cuma')
      değilse: yaz('Hafta sonu')
    bitir
    gün değerine göre
      1..5: yaz(' (iş günü)', 1)
      6, 7: yaz(' (tatil)', 1)
    bitir
  bitir
bitir.
Çıktı
1: Pazartesi (iş günü)
2: Salı (iş günü)
3: Çarşamba (iş günü)
4: Perşembe (iş günü)
5: Cuma (iş günü)
6: Hafta sonu (tatil)
7: Hafta sonu (tatil)