Последовательность слов Опции

[garry_m]

Народ! Пожалуйста помогите решить задачу!

Дана непустая последовательность слов, составленных из цифр и латинских букв, разделенных произвольным числом пробелов. Написать процедуру, которая считывает слово из заданной последовательности и определяет, является ли оно синтаксически корретным идентификатором Паскаля.

[volvo]

garry_m, я вот только одного не понял, если ты сразу после ввода строки пройдешь по ней с таким циклом:

i := 1;
while i <= length(txt) do
  if txt[i] in ['0' .. '9', '_'] then delete(s, i, 1)
  else inc(i);

твое задание не будет считаться выполненным? Что, обязательно все усложнять и разбивать строку на слова? Я вижу, что в задании написано:

Дана последовательность, содержащая от 2 до 30 слов, в каждом из которых от 2 до 10 символов; между соседними словами - произвольное число пробелов, за последним словом точка. Напечатать эту же последовательность, удалив из всех слов цифры и символы подчеркивания.

, а ты зачем-то пробелы удаляешь...