Опубликовано 12.06.2017 по предмету Информатика от Гость >> <<

Паскаль абс оператор саsе
Ввести с клавиатуры букву 7-го класса. Определить его тип:
а - гимназический, б - математический, в - обычный, г - коррекция.
(Буква может быть большой или маленькой).

Ответ оставил Гость

Var
    letterOfClass : string;
begin
    write(Введите букву класса: );
    readln(letterOfClass);
    case letterOfClass of
        a,A : writeln(7-, letterOfClass, это гимназический класс.);
        b,B : writeln(7-, letterOfClass, это математический класс.);
        v,V : writeln(7-, letterOfClass, это обычный класс.);
        g,G : writeln(7-, letterOfClass, это клас корреции.);
        else writeln(Класса с такой буквой нет);
    end;
end.