Algofil
Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Цитата:| Правда обычными вложенными циклами. |
я понял что глубина вложений переменная, потому и не предлагал циклы, в любом случае рекурсия здесь удобнее, но сало надо перепрятать (тьху, стек увеличить!)
Добавлено:
Цитата:| тебе не кажется, что цикл будет бесконечным? |
не будет, но лучше без екзит, просто вайл ch<>'z'
Цитата: while not(ch in S) do
ch:=Suce(ch); |
полная фигня, имхо, у меня нет компилятора (сцылу дайте), но он 100 пудов заругается на сусе, кроме того while not(ch in S) - "темна вода во облацех", используйте номера по таблице аскии, я например легко с клавы введу символ с кодом меньше чем 32 )))
не в форуме конечно, а в паскакале
|
