как реализовать возможность прерывания выполнения программы при нажатии любой кнопки на клавиатуре?

А на каком языке надо?
В общем случае запуск программы необходимо выполнить в цикле, и прерывать его по нажатии клавиши.
Например:
(не помню как там точно на паскале)
var
kod : integer;
repeat
...
kod := readkey;
...
until keypressed;

В Делфах можно поставить на событие OnKeyPress у формы (или другого компонента, тут кнопки) соответвующую реакцию.
Например вот так:
var
Form1: TForm1;
kod : boolean;
implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
repeat
Form1.Caption:=IntToStr(StrToInt(Form1.Caption)+1);
application.ProcessMessages;
until kod;
kod :=false;
end;

procedure TForm1.Button1KeyPress(Sender: TObject; var Key: Char);
begin
kod :=true;
end;

end.
Только не забудь поместить перед запуском в Form1.caption какое-нибудь числовое значение.

ой =)...вот я дурак.На сях нада.На СИ++ причём не борланды и визуал студио...а самый что ни на есть обычный Си++

На си я тебе не смогу посоветовать. Попробуй тут http://progc.narod.ru/links.htm может попадешь на ссылки какие дельные.

КБхит-функция борланда.
Мне нужно на ANSI C++.

Хи-хи. kbhit() и getch() стандартные функции ANSI C, определены в conio.h
Более стандартных вещей просто не бывает.

Верно!!! Спасибо большое !!!