2.7.-rasm.
Quyida case buyrug’iga misol keltirilgan.
case n_day of
1,2,3,4,5: day:='Ish kuni. ' ; 6: day:='Shanba!';
7: day:='Yakshanba!';
end;
case n_day of
1..5: day:='Ish kuni.';
6: day:='Shanba!';
7: day:='Yakshanba!';
end;
case n_day of
6: day:='Shanba!';
7: day:='Yakshanba!'; else day:='Ish kuni.'; end;
case operatorini qo’llashga misol sifatida og’irlikni funtdan kilogrammga o’tkazuvchi dasturni ko’rib o’tamiz. Dasturda turli mamlakatlarda funtning hisoblashni turlicha bo’lishi ham hisobga olinadi. Masalan, Rossiyada bir funt 409,5 gramm, Angliyada 453,592 gramm, Germaniya, Daniya va Islandiyada esa 500 grammga teng.
2.8-rasmda tasvirlangan dasturning muloqot oynasida mamlakatlarni tanlash uchun Mamlakat ro’yxatidan foydalaniladi.
Do'stlaringiz bilan baham: |