PROGRAM összefésül VÁLTOZÓK: beolvas1, beolvas2: BEFÁJL, kiír: KIFÁJL, sz1, sz2: EGÉSZ MEGNYIT beolvas1: "BEOLVAS 1" MEGNYIT beolvas2: "BEOLVAS 2" MEGNYIT kiír: "KIÍR" BE beolvas1: sz1 BE beolvas2: sz2 CIKLUS AMÍG NEM (VÉGE beolvas1 ÉS VÉGE beolvas2) HA sz1 < sz2 AKKOR KI kiír: sz1, SV BE beolvas1: sz1 HA VÉGE beolvas1 AKKOR sz1:=sz2+1 HA_VÉGE KÜLÖNBEN KI kiír: sz2, SV BE beolvas2: sz2 HA VÉGE beolvas2 AKKOR sz2:=sz1+1 HA_VÉGE HA_VÉGE CIKLUS_VÉGE LEZÁR beolvas1 LEZÁR beolvas2 LEZÁR kiír PROGRAM_VÉGE