Нужна помощь. 2 задачки на турбо-паскале

Флудеры вы... :)
Большинство существ (в т.ч. 1 волк) уже заглянуло в тему, за что им спасибо.
Один усиленно решает первую задачку, счас уже до ума доведем.
Может, еще кто подтянется