Без строкового типа определить наличие определённых символов (Pascal)

[(=Hello=)]

Использовать строковый тип нельзя.

Если во вводимой последовательности символов входит каждая из букв слова 'key', тогда в качестве ответа вывести слово 'yes', а иначе - слово 'no'. Ввод продолжать до нажатия ‘PgUp’ на дополнительной клавиатуре.

[D@rkD@iver]

сделаю за 100р

[Саня]

Сообщение от D@rkD@iver

сделаю за 100р

Правильно! "Помогите..." и "Сделайте вместо меня..." разные понятия. Попытки то были? Мысли там, какие-нибудь?

[Антон Лысенко]

Сообщение от D@rkD@iver
сделаю за 100р

Почему так дёшево?)))У нас 50 укр грн лабку сделать)))

[Alt]

Если строковый тип нельзя использовать, куда вводится строковая последовательность? В PChar?

[(=Hello=)]

Сообщение от Саня

Правильно! "Помогите..." и "Сделайте вместо меня..." разные понятия. Попытки то были? Мысли там, какие-нибудь?

Попытки были. Я сделал со стрковым типом, но нужно без.

[Grag]

Используй ReadKey и Char... Анализируй вводимый символ...