Оператор множественного выбора CASE

СТРУКТУРА

CASE <ПЕРЕМЕННАЯ> OF      <ЗНАЧЕНИЕ1>:<ОПЕРАТОР1>;      <ЗНАЧЕНИЕ2>:<ОПЕРАТОР2>;      <ЗНАЧЕНИЕ3>:<ОПЕРАТОР3>;      ………………………………;      ELSE <ОПЕРАТОР N>; END;

ОСОБЕННОСТИ

ЕСЛИ ПЕРЕМЕННАЯ НЕ ПРИНИМАЕТ НИ ОДНО ИЗ ПЕРЕЧИСЛЕННЫХ ЗНАЧЕНИЙ, ТО РАБОТАЕТ

ЗАДАЧА 1

ПРИВЕДИТЕ ВВЕДЕННОЕ ПОЛЬЗОВАТЕЛЕМ ЧИСЛО ОТ 0 ДО 9 К ЕГО

ОПЕРАТОР IF

PROGRAM CHISLO; VAR N : SHORTINT; BEGIN      WRITE(‘INPUT NUMBER: ');      READLN(N);      IF N=0 THEN WRITE(‘ZERO')        ELSE IF N=1 THEN WRITE(‘ONE')         ELSE IF N=2 THEN WRITE(‘TWO')          ELSE IF N=3 THEN WRITE(‘THREE')            ELSE IF N=4 THEN WRITE(‘FOUR')              ELSE IF N=5 THEN WRITE(‘FIVE')                ELSE IF N=6 THEN WRITE(‘SIX')                  ELSE IF N=7 THEN WRITE(‘SEVEN')                    ELSE IF N=8 THEN WRITE(‘EIGHT')                      ELSE IF N=9 THEN WRITE(‘NINE')                        ELSE WRITE('THIS IS NOT A

PROGRAM CHISLO; VAR N:SHORTINT; BEGIN      WRITE(‘INPUT NUMBER: ');      READLN(N);      CASE N OF        0: WRITE ('ZERO');        1: WRITE

ЗАДАЧА 2

НАПИСАТЬ ПРОГРАММУ, КОТОРАЯ ЗАПРАШИВАЕТ У ПОЛЬЗОВАТЕЛЯ НОМЕР МЕСЯЦА И ВЫВОДИТ

ЗАДАЧА 3

ВВОДИТСЯ ЧИСЛО ОТ 1 ДО 10.  ВЫВЕСТИ ДАННОЕ ЧИСЛО, ЗАПИСАННОЕ

ЗАДАЧА 4

ДАНО НАТУРАЛЬНОЕ ЧИСЛО N (N<20), ОПРЕДЕЛЯЮЩЕЕ СУММУ ДЕНЕГ В РУБЛЯХ. ДАТЬ ДЛЯ

ЗАДАЧА 5

В НЕКОТОРОМ УЧЕБНОМ ЗАВЕДЕНИИ ДЕЙСТВУЮТ СЛЕДУЮЩИЕ ПРАВИЛА ПРИЕМА. АБИТУРИЕНТЫ СДАЮТ

ЗАДАЧА 6

В СТАРОЯПОНСКОМ КАЛЕНДАРЕ БЫЛ ПРИНЯТ 12-ЛЕТНИЙ ЦИКЛ. ГОДЫ ВНУТРИ ЦИКЛА