Помогите упростить задачку...(Паскаль)

[MadReason]

А если две согласных подряд? То нужно проверять чтоб они не в конце стояли и не в начале. Вобщем долго это... Делай лучше функции.

[Игорь Акопян]

[флуд]
BBB, ну... я это.... память плохой совсем... суть главное понятна

[BBB]

[ре-флуд]
Игорь Акопян, с кем не быват! Как сказал кто-то из великих, хороший инженер - не тот, кто все знает, а тот, кто знает, в каком справочнике найти ответ на вопрос. Так и тут - если что не так, компилятор ругнется и хелп под рукой - уточнить
(Я вот никак не запомню, какой синтекстис, если надо инициализировать константную запись. Или еще хлеще - массив записей. Там в Паскалюге такие навороты, что фиг запомнишь )

[somewhere]

если надо инициализировать константную запись. Или еще хлеще - массив записей

Такая же ерунда ... извиняюсь за оффтоп...