Бағдарламалау технологиялары және тілдер

Таңдау операторы арқылы программадағы мүмкін болатын бірнеше оператордың біреуі таңдалады. Real және String типтерінен басқа кез-келген типті қабылдайтын айнымалы немесе өрнек таңдау параметрі болып табылады. Ол сұрыптаушы деп аталады.

Таңдау операторының құрылымы:

Case сұрыптаушы of таңдау тізімі else оператор end;

немесе

…

n- тұрақты: n- оператор

сase-жағдай, of-бойынша қызметші сөздері.

Бұл оператор былайша жұмыс істейді:

Алдымен өрнектің мәні есептеледі, сонан соң өрнектің мәніне тең тұрақты ізделінеді. Сәйкесінше сол тұрақтыдан кейін жазылған оператор орындалады да, таңдау операторының жұмысы аяқталады. Егер тізімде есептелген мәнге тең тұрақты табылмаса, басқару else сөзінен кейін тұрған операторға беріледі.

Program m1;

var n: byte;

begin

read (n);

сase n of

1: Writeln (Дүйсенбі);

2: Writeln (Сейсенбі);

3: Writeln (Сәрсенбі);

4: Writeln (Бейсенбі);

5: Writeln (Жұма);

6: Writeln (Сенбі);

7: Writeln (Жексенбі)

else writeln (Дұрыс емес)

end; таңдау операторының соңы

end. программаның соңы

Мысал 14. Y немесе y символы енгізілсе экранға «иә» сөзі,

N немесе n символы енгізілсе «жоқ» сөзі шығатын программа.

var c: char;

begin

сase с of

`n`, `N`: writeln (`жоқ );

`y`, `Y`: writeln (`иә);

end

end.

var k: byte;

begin

write (`Ай нөмірін енгіз:1-12); read (к);

1..2,12:Writeln (Қыс);

3..5: Writeln (Көктем);

6..8: Writeln (Жаз);

9..11: Writeln (Күз);

else Writeln (қате);

end

end.

Program m1;

var n: byte;

begin

сase n of

0: Writeln ( Мешін жылы);

1: Writeln ( Тауық жылы);

2: Writeln (Ит жылы );

3: Writeln (Доңыз жылы);

4: Writeln (Тышқан жылы);

5: Writeln (Сиыр жылы);

6: Writeln (Барыс жылы);

7: Writeln (Қоян жылы);

8: Writeln ( Айдаһар жылы);

9: Writeln (Жылан жылы);

10: Writeln (Жылқы жылы);

11: Writeln (Қой жылы);

else writeln (Дұрыс емес)

end; {таңдау операторының соңы}

end. {программаның соңы}