Исправление Shushundr, (текущая версия) :
Проблема не в этой процедуре, а в той, в которой написаны строки
GetKey(c);
case c of
...
(то есть в главном блоке программы, или как там это в паскале называется)
Сначала все переменные надо объявлять, а только потом передавать внутрь GetKey.
Я думаю, что объявление имелось в виду
ch : char;
определись с именем переменной - она должна быть либо везде «c», либо везде «ch». (везде - это в главном блоке программы и объявлении его переменных).
Исправление Shushundr, :
Проблема не в этой процедуре, а в той, в которой написаны строки
GetKey(c);
case c of
...
(то есть в главном блоке программы, или как там это в паскале называется)
Сначала все переменные надо объявлять, а только потом передавать внутрь GetKey.
Я думаю, что объявление имелось в виду
ch : char;
определись с именем переменной - она должна быть либо везде «c», либо везде «ch».
Исправление Shushundr, :
Проблема не в этой процедуре, а в той, в которой написаны строки
GetKey(c);
case c of
...
Сначала все переменные надо объявлять, а только потом передавать внутрь GetKey.
Я думаю, что объявление имелось в виду
ch : char;
определись с именем переменной - она должна быть либо везде «c», либо везде «ch».
Исходная версия Shushundr, :
Проблема не в этой процедуре, а в той, в которой написаны строки
GetKey(c);
case c of
...
Сначала все переменные надо объявлять, а только потом передавать внутрь GetKey.