Программирование процедур в задачах обработки текста

[Numi_Pumi]

Здравстуйте,мне очень нужно решит эту задачу Заранее благодарю
Требуется разработать программу, выполняющую однотипные действия с одной или несколькими последовательностями символов (они обозначены А, В, С). Программа должна использовать созданную по условию процедуру. В зависимости от алгоритмического языка под последовательностью символов можно подразумевать массив символов, строку или строковый литерал.Delphi Паскаль...
1. Проверить, является ли каждая из последовательностей А, В, С десятичной записью целого числа.
Использовать самостоятельно разработанную процедуру, проверяющую, является ли заданная последовательность записью десятичного числа.

[Stilet]

Ну это не проблема:
Функа отличающая число от текста может выглядеть так:

var i:integer;s:string;
begin
 s:=Edit1.Text; i:=1;
 while s[i] in ['0'..'9'] do inc(i);   dec(i);
 if i=length(s) then caption:='Its Number' else Caption:='Its not number';
end;

[Numi_Pumi]

Спасибо большое )))))))
а можно полностью программу написать?если не сложно :-[

[Numi_Pumi]

так как я дуб в этом деле

[Stilet]

Ты подумай, почитай книжки и погугли, я уж домой ухожу - Ядро у тебя есть тебе осталось 20% написать.

[Numi_Pumi]

хорошо :-)))но все равно,большое спасибо за помощь :-))