Обработка массива. Нужна помощь.

[kvic]

Коллеги!

У меня проблема не могу разрулить обработку данных.
Есть текстовый файл структурированный.
Файл могу распарсить и превести к массиву данных:

№;К1 ;К2
1;А  ;Б
0;   ;В
2;Г  ;Д
3;Е  ;Ё
0;   ;Ж

Нужно обработать массив и на выходе получить следующее:
№;К1 ;К2
1;А  ;БВ
2;Г  ;Д
3;Е  ;ЁЖ

Второй день бьюсь. Помогите!!!

Да, вся эта ересь обрабатывается на VBA.

Заранее спасибо.

[ArcFi]

Код: [Выделить]

sed ':a;N;$!ba;s/\n0;[ \t]*;//g' file
http://stackoverflow.com/questions/1251999/sed-how-can-i-replace-a-newline-n

[kvic]

Спасибо, но я это реализую на VBA (Visual basic for application) нет таких средств. Если можно, то помогите решить стандартными средствами: циклы, условия и т.д.
Заранее спасибо.

[ArcFi]

Тогда вы неудачно выбрали форум.
VBA — не Linuxовый метод решения задач.

[SergeyIT]

Добавлю
http://forum.sources.ru/index.php?showforum=20
или
http://rsdn.ru/forum/vb/
...

[Azure]

Код: (bash) [Выделить]

while read line
do
  if [ ${line%%;*} == 0 ]
  then
    s=$s${line##*;}
  else
    if [ "$s" ]
    then
      echo $s
    fi
    s=$line
  fi
done
echo $s

[kvic]

Тогда вы неудачно выбрали форум.
VBA — не Linuxовый метод решения задач.

Согласен, с тем что это Linuxовый форум. Но ветка о программировании. И какая разница на чём это реализовывать (bash, python, c/c++, forth, pascal etc.)

И ещё, там где я это реализовываю у меня из средств разработки только VBA.
Так что если следовать Вашему совету -- ждать пришедствия Linuxа, то решение задачи, в моих условиях  можно так же ждать -- всю оставшуюся жизнь. :-)

[alsoijw]

kvic, сформируй правило словами, а  то пример не совсем понятен.

[Azure]

какая разница на чём это реализовывать (bash, python, c/c++, forth, pascal etc.)

Так и возьмите bash-евую реализацию и адаптируйте под свой VBA. Там никаких сверх-функций не использовано, только стандартные циклы, условия, присвоение/вывод значения переменной, обрезка строк.

[.ubuntufan]

И какая разница на чём это реализовывать (bash, python, c/c++, forth, pascal etc.)

Ну вот вам на питоне решение тогда

Код: (python) [Выделить]

import codecs

with codecs.open('data', 'r', 'utf-8') as f:
        res = []
# skip first line
fl = f.readline().rstrip("\n")
for line in f.readlines():
line = line.rstrip("\n")
if len(line) > 0:
if line[0] == '0':
if not res:
raise Exception('Zero is in first line. They gave me an incomplete conditions!')
parts = line.split(';')
if len(parts) > 1:
parts = map(lambda x: x.strip(), parts[1:])
res[-1] = res[-1] + ''.join(parts)
else:
res.append(line)

res.insert(0, fl)
print "\n".join(res)

И задание неполное
Что делать если первая строка нулевая? Могут ли остальные числа начинаться с нуля (06, 07 и т.д.)?