Дается символ или символ(любой,или вводимый).Написать программу которая определяет буква...

Question

Дается символ или символ(любой,или вводимый).Написать программу которая определяет буква это или символ.

Comments

"Дается символ или символ..." - сильно сказано. Сразу вспоминается известная фраза "... двое детей - мальчик и ююю мальчик".за

---

"Дается символ или символ..." - сильно сказано. Сразу вспоминается известная фраза "... двое детей - мальчик и ...ю мальчик".за

---

Да... сайт работает сегодня просто изумительно - глючит, виснет и глотет символы.

Answer 1

Var
i:integer;
begin
    writeln('Введите символ: ');readln(i);
    if (i>64) and (i<91) or (i>96) and (i<123) or (i>191) then
        writeln('Это буква: ',chr(i))
    else
        writeln('Это символ: ',chr(i));
end.