И опять эта строка.. Опции

[Merlin]

Задача : Составить программу для вычеркивания из слов текста всех букв, стоящих на нечетных местах после буквы "а".

Помогите разобраться с задачкой.

1. Под вычёркиванием понимется удаление ?
2. Не могу что то разобраться, как найти буквы, стоящие на нечётных местах ?

[klem4]

Merlin, Надо всего чуть-чуть подумать

i := 2;
   while(i<=length(s)) do
    if s[succ(i)] = 'n' then begin
       delete(s,i,1);
       inc(i);
    end
    else inc(i,2);

Volvo, я думаю тут надо удалять элементы, стоящие на четных позиция, после которых стоит буква 'n'

Сообщение отредактировано: volvo - 5.11.2006 21:42