joâ j ± tiíe ² 0 óiúe ²0000 ðerí ä벸095± ²00 ± íoäe liót.ùeó íáóter½óet ± ä벸095± ócoðe ðroject íáóter íáóter½álçol¬ âlocëó.ùeó âeçiî   iîteçer íáxî¬íáxf¬íáx_foró¬tilfr¬tilfç¬ótráteçi¬áît_foró¬teót»   reáä(iî¬íáxî¬íáxf¬íáx_foró¬tilfr¬tilfç¬ótráteçi¬áît_foró¬teót©»   âeçiî   iîteçer árráù     ç{t(±:íáx_foróªíáx     óöár(±:íáx_foró©¬     riçtiç¬áët(±:íáx     óõc(0:íáxf¬±:íáx     áît±¬áît²(±:íáxf©»   árráù fáröe(±:íáxf©»   iîteçer     óðürç¬áîtó¬t{ller¬i¬î¬áëtóöár¬foró¬f»   reál     tiíe»   iîteçer ðroceäõre óáííeîliçî(ö±¬ö²©»   iîteçer árráù ö±¬ö²»   âeçiî     iîteçer î¬reó¬f»     t{ller:½t{ller+±»     reó:½0»     for î:½± óteð ± õîtil íáxî äo     if ö±(ö²(î©     tèeî reó:½reó+±00     elóe     âeçiî       áît±(ö±(î©©:½áît±(ö±(î©©+±»       áît²(ö²(î©©:½áît²(ö²(î©©+±»     eîä»     for f:½± óteð ± õîtil íáxf äo     âeçiî       reó:½reó+(if áît±(f©¾áît²(f© tèeî áît²(f© elóe áît±(f©©»       áît±(f©:½áît²(f©:½0»     eîä»     óáííeîliçî:½reó»     if teót óèift (-±©extráct ±½± áîä t{ller íoä ±00½0 tèeî     âeçiî       write(oõt¬<:<±0¾óáííeîliçî teót::¾©»       for î:½± óteð ± õîtil íáxî äo write(oõt¬<:  î::¾¬î¬ö±(ö²(î©©»       write(oõt¬<:  reó::¾¬reó©»       óetðoóitioî(oõt¬0¬0©»     eîä»   eîä»   ðroceäõre íáóter(áët¬áët_óöár©»   öálõe áët_óöár»   iîteçer áët_óöár»   iîteçer árráù áët»   âeçiî     iîteçer f¬î»     âooleáî ðroceäõre teót_íoä_èiätiäiçe_óöár»     âeçiî       âooleáî ðáóóer»       iîteçer árráù fielä iáf»       iîteçer ó»       for ó:½±¬ó+± wèile ó<½áît_ó áîä ðáóóer äo       âeçiî         iáf:½(ó-±©ªíáxî óèift ±»         ðáóóer:½óáííeîliçî(áët¬ç{t.iáf©½óöár(ó©»       eîä»       teót_íoä_èiätiäiçe_óöár:½ðáóóer»     eîä»     ðroceäõre oðt{l(î©»     öálõe î»     iîteçer î»     âeçiî       áët(î©:½áâó óõc(áët(       if áët(0 tèeî       âeçiî         áët(î©:½óõc(0¬î©»         if î<íáxî tèeî oðt{l(î+±©»       eîä»     eîä»     ðroceäõre oðt{l_îõl(î©»     öálõe î»     iîteçer î»     âeçiî       oðt{l(î©»       for î:½î-± wèile î¾0 äo áët(î©:½óõc(0¬î©»     eîä»     ðroceäõre iîäó{t_óöár»     âeçiî       iîteçer árráù fielä iáf»       iáf:½áît_óªíáxî óèift ±»       áîtó:½áîtó+±»       tofroí(ç{t.iáf¬áët¬íáxî óèift ±©»       óöár(áîtó©:½áët_óöár»     eîä»     ðroceäõre fjerî_fáröe(f¬î©»     öálõe f¬î»     iîteçer f¬î»     âeçiî       iîteçer î{óte¬i» coííeît      write(oõt¬<:<±0¾fjerî fáröe::¾¬f¬î©»       i:½î{óte:½óõc(f¬î©»       if î{óte¾0 tèeî       âeçiî         óõc(f¬î©:½-î{óte»         reðeát i:½óõc(i¬î© õîtil óõc(i¬î©½f or óõc(i¬î©½-±»         óõc(i¬î©:½î{óte»       eîä » coííeît      óëriö_óõc»     eîä»     ðroceäõre óëriö_óõc»     if teót extráct ±½± tèeî     âeçiî       iîteçer f¬î»       write(oõt¬<:<±0¾óëriö_óõc:¾©»       for f:½ 0 óteð ± õîtil íáxf äo       âeçiî         write(oõt¬<:<±0¾:¾©»         for î:½± óteð ± õîtil íáxî äo         write(oõt¬óõc(f¬î©©»       eîä»     eîä»     if áët_óöár½-± tèeî     âeçiî       <ª iîit áf ö{räier for èöert óðil ª¾       for î:½± óteð ± õîtil íáxî äo       âeçiî         for f:½± óteð ± õîtil íáxf äo         óõc(f¬î©:½f íoä íáxf+±»         f:½(î-±©ªíáxf¯¯íáxî+±»         óõc(0¬î©:½óõc(f¬î©»         óõc(f¬î©:½0»       eîä»       óëriö_óõc»       for f:½± óteð ± õîtil íáxf äo áît±(f©:½áît²(f©:½0»       áît_ó:½0»       t{ller:½0»       if tilfç¾0 tèeî tilfç:½áâó(tilfç-±00©»       ëáót(áët¬tilfç©»     eîä     elóe     âeçiî       iîäó{t_óöár»       <ª ótráteçi ª¾       for i:½0 óteð ± õîtil 3 äo       if ótráteçi óèift (-i© extráct ±½± tèeî       âeçiî iîteçer î±¬î²»         cáóe i+± of         âeçiî           if áët_óöár½0 tèeî           âeçiî             for î±:½± óteð ± õîtil íáxî äo             for î²:½± óteð ± õîtil íáxî äo             fjerî_fáröe(áët(¬î²©» coííeît            write(oõt¬<:<±0¾ótráteçi ± ârõçt:¾©»           eîä»           if áët_óöár<±00 tèeî           âeçiî             for î±:½± óteð ± õîtil íáxî äo             fjerî_fáröe(áët(¬î±©» coííeît            write(oõt¬<:<±0¾ótráteçi ² ârõçt:¾©»           eîä»           oðt{l_îõl(íáxî-áët_óöár¯¯±00©»           oðt{l(±©         eîä»       eîä»       wèile -¬ teót_íoä_èiätiäiçe_óöár äo oðt{l(±©»     eîä»   eîä»   ðroceäõre ëáót(ö¬tilf©»   iîteçer árráù ö»   iîteçer tilf»   âeçiî     write(oõt¬<:<±0¾:¾©»     for î:½± óteð ± õîtil íáxî äo     âeçiî       if tilf¾0 tèeî       âeçiî         ráîäoí(tilf©»         ö(î©:½tilf íoä íáxf+±»       eîä       elóe       âeçiî         reáä(iî¬ö(î©©»         ö(î©:½áâó (ö(î©-±© íoä íáxf+±»       eîä»       if tilf¾0 tèeî write(oõt¬ö(î©©»     eîä»   eîä»   for f:½± óteð ± õîtil íáxf äo fáröe(f©:½   reál( if f¾½±0 tèeî <:õëeîät  :¾ elóe cáóe f of(   <:èöiä    :¾¬<:rüä     :¾¬<:çõl     :¾¬<:çrüî    :¾¬<:âl}     :¾¬   <:óort    :¾¬<:lillá   :¾¬<:oráîçe  :¾¬<:ârõî    :¾©©»   write(oõt¬<:<±0¾ö{lç íelleí fülçeîäe fáröer::¾©»   for f:½± óteð ± õîtil íáxf äo write(oõt¬ótriîç fáröe(f©©»   for foró:½± óteð ± õîtil áît_foró äo   âeçiî     óðürç:½0»     ëáót(riçtiç¬tilfr©»     for áët_óöár:½-±¬óáííeîliçî(riçtiç¬áët© wèile áët_óöár<±00ªíáxî äo     âeçiî       óðürç:½óðürç+±»       if áët_óöár<¾-± tèeî       write(oõt¬<:<±0¾óöár::¾¬áët_óöár¯¯±00¬<: óorte¬ :¾¬áët_óöár íoä ±00¬<: èöiäe.:¾©»       óetðoóitioî(oõt¬0¬0©»       íáóter(áët¬áët_óöár©»       write(oõt¬<:<±0¾ç{t:¾¬óðürç¬<:::¾©»       for î:½± óteð ± õîtil íáxî äo write(oõt¬ótriîç fáröe(áët(î©©©»     eîä»     write(oõt¬<:<±0¾r i ç t i ç !  ó ö á r e t   ð } ::¾¬óðürç¬     <: f o r ó ü ç<±0¾iîterîe óáííeîliçîiîçer½:¾¬t{ller©»   eîä» eîä» eîä» íáóter ´¬6¬²0¬-±¬-±¬·¬3¬0¬ 3¬±¬±¬5¬ ±¬²¬´¬5¬ ´¬6¬5¬3 ±¬²¬´¬5 ²¬´¬3¬² ±¬±¬3¬5 fiîió