Добрый день!
Научите как запрограммировать на Паскале:
Например, печатается какой-то символ бесконечно. Нажимается другой символ и начинает печататься нажатый символ.
То есть, при нажатии какого-то символа (в любое время) изменяется ход программы.
Заранее спасибо, Александр.

Функция READKEY Вам в помощь:

{ReadKey.PAS}
 ▀▀▀▀▀▀▀▀▀▀▀▀▀▀
 { Пример программы для функции ReadKey }

 Uses Сrt;

 Var C : Char;

 Begin
  WriteLn('Нажмите любую клавишу:');
  C:=Readkey;
  WriteLn('Вы нажали ', C, ', с кодом ASCII равным ', Ord©, '.');
 End.

Или еще пример:

...
Repeat
If KeyPressed then Ch:=ReadKey;
If Ch=#0 then Ch:=ReadKey; {проверка на функциональную клавишу (расширенный код)}
Write(Ch);
Until Ch=#27; {#27 - код нажатия ESC}
...