[MushGUN]

Imikle спасибо за разъясниние
не мог ты или кто-нибудь другой на pascal написать эту прогу
а там попытаюсь уж по ходу кода разобраться