функция CHR 2 символа подряд

[Dalokoshka]

Покажите, пожалуйста , как в программе написать *#
как их в отдельности написать я знаю, а вместе? Если быть точнее мне надо проверить, соответствует ли символ введенный пользователем, который читается как чар, вот этому*#.
пример: chr (37): write ('sootvetstvuet")

[Alex Cones]

Case в данном случае не подойдет, придется использовать If и сравнение строк:

if S = '*#' Then Write('This is it!')
                Else Write('Try again!');

[Dalokoshka]

Значит через chr это сделать невозможно?

[Alex Cones]

CHR, а равно как и ORD - функции одного символа.

[Dalokoshka]

Спасибо, буду знать.

[Stilet]

if S = #37 Then Write('This is it!')
                Else Write('Try again!');

где s:char;
Всего то...

[Alex Cones]

Stilet, разве это проверит 2 символа? Требуется сравнение '*#'

[Stilet]

Так я понял что автору нужно пример: chr (37): write ('sootvetstvuet")
Потому и предложил chr заменить на #
Всего то

[Dalokoshka]

Я сделала как вы советовали, все компилируется , но при вводе *# пишет "недер" это else. Почему?

[Alex Cones]

tst : String;