Оператор case в задаче выбора

Задача: 

Бывает, что вместо оператора if удобнее использовать оператор case. Обычно это случается, если переменная по условию задачи может принимать ограниченный диапазон значений или только конкретные значения. Текущее значение переменной (селектора) сравнивается со значениями-случаями, перечисленными в теле оператора case. Если значение селектора совпадает с каким-либо значением в операторе case, то выполняется ветка, относящаяся к данному случаю.

В задаче ниже в конструкции case сравнивается значение переменной ch с различными диапазонами значений. В случае совпадения, выводится соответствующая надпись.

Программа на языке Паскаль: 

var
    ch: char;
 
begin
    write ('Введите символ:  ');
    readln (ch);
 
    case ch of
        '0'..'9': write ('Это число');
        'a'..'z','A'..'Z': write ('Это английская буква');
        'а'..'я','А'..'Я': write ('Это русская буква')
    end;
 
readln
end.

Примечания: 

Запись типа ‘a’..’z’ включает диапазон значений от символа ‘a’ до символа ‘z’ включительно.

Комментарии

зачем перед END стоит

зачем перед END стоит оператор ввода?

задержка экрана

задержка экрана

Ответ

Для того что бы программа закрылась после нажатия любой клавишы))))

Если среда программирования

Если среда программирования сразу закрывает окно вывода после выполнения программы, то этот лишний оператор позволяет сделать так, чтобы оно не закрылось. Окно закроется только после нажатия любой клавиши. Его не надо писать, если программа запускается в командной оболочке.

case

помогите!
надо ввести 3 числа a, b , c
если какое-то число равно нулю тогда ему соответствует логическое значение b[1] b[2] и b[3]. Как через case вывести на екран когда
a=0
b=0
c=0
a и b = 0
a и b и с = 0
b и с = 0
все числа не равны нулю