Цитата(volvo @ 18.11.2006 23:27)
Идею? Пожалуйста... Все, что ДО первого пробела - это первое число, значит, Copy(s, 1, Pos(' ', s) - 1) будет хранить строковое представление первого числа... Пытаешься преобразовать его в число через Val... Если будет ошибка (третий параметр НЕнулевой) - значит, выведешь сообщение...
Что касается последнего числа... Тут немного сложнее, придется пробежать по строке (лучше всего - с конца к началу), найти последний пробел, и проделать с остатком строки ПОСЛЕ него то же самое...
я так и подразумевал, большое спасибо. Если например первым и последним элементом строки окажется пробел, то можно же и использовать функцию, которая удаляет лишние пробелы, а потом уже выполнять уже написанные вами действия?