SHODA PARTNERU  , P(@)(P()x:P(@)x:P( )x:P(`)x: P()x:P( )x:P(@)xa2P()`:P()p:P(@)p:P()p: P(0)p<:'*OBRAZEK MUZE*F@,: "*"qP@,: "*":@,@: "*":0,:"*":0,: "*":0,@: "*"Z f,d [@] ,(,,,,,!,A,F,H,s,d,,,,,,`, , ,,,,,,,,,,,,,,,,)n [@] ,(,,,,,,,,,,$,,,,,,,$,$,~,,,,~,<,,,,,,,,,,)x [@] ,(,@, ,,,,,,<,,,,,,,,, ,,,,, , ,@,@,,,,,,,@, , , ):'*OBRAZEK ZENY* ,@ [@] ,(,,,,,, , ,@,A,B,,,,,,,,,h,P,P,H,T,R,Q,P,P,T,D,E,J,*,, )[@] ,(,,,,,, ,, ,,,,,,,,,,,<,,,,<,,,,~,B,,,,,,)[@] ,(,@, ,,,,,,,B,",,I, ,,,,, ,, , ,,*,J,, , ,*,",,R,T,X,P)5 , :""[`,:"VYPOCET VHODNOSTI PARNERU":`, :"VYPOCET POHLAVI DITETE"4 ,P:"" `.A1$"O2C2R0C2R0C2R0 C7R5C2R0C2R0C2R0C7R5" A1$ , "TISK UVODU ? (A-N)/";B$ B$"N" ,@0"""R,"PROGRAM DAVA ODPOVED NA TO,JAK SE PARTNERI K SOBE HODI Z HLEDISKA BIORYTMU.65@ "PRO MANZELSKE PARY SE VYPOCET NEDOPORUCUJE !"JDT "*POCITAC SHARP NEBERE ZODPOVEDNOST ZA VZNIKLE PROBLEMY *"^h "VYPOCET POHLAVI DITETE JE OTAZKOU VELMI SLOZITOU A NA DOPORUCENI POCITACE JE NUTNO SE DIVAT Z HLEDISKA NEJPRAVDEPODOBNEJSIHO VYSLEDKU NASEHO SNAZENI."r1| ""  ,( "NAPISTE DNESNI DATUM" "DEN :";A1 "MESIC:";A2 "ROK :";T "NAPISTE NAROZENI ZENY" "DEN :";D "MESIC:";M "ROK :";R   S1S& "NAPISTE NAROZENI MUZE"0 "DEN :";D: "MESIC:";MD "ROK :";R N  XS2Sbl@,%v " VYPOCET VHODNOSTI PARNERU". " ***********************************"  , (`,)  A(A)SA(SAsQZ)S(S1S2)FA(8)(X(F8)H!X(XH)HCA(`)(Y(C`)H!Y(YH)HHA()(Z(H)H! Z(ZH)H,  "SHODA VE FYZICKEM CYKLU......"X;" %"*,4 "SHODA V CITOVEM CYKLU........"Y;" %">,H "SHODA V INTELEKT. CYKLU......"Z;" %"R&\ "FAKTOR UPLNE SHODNOSTI......."f h,@5p (((XYZ)@H)H);" %"z , ) "VYPOCET POHLAVI DITETE?(A/N)/";B$ B$"N"  H, (`,) , ' "" ,`"VYPOCET POHLAVI DITETE" ,'""  z0 " ROK PREDPOKLADANEHO POCETI:" ;T1 TT15$"MESIC/DEN 1.AZ6. 7.AZ12 13.AZ18. ". " 19.AZ26. OD 27."8"BS(S1S2)@(Ta)LT1(S6)VX(S6T1)pT1 `J jK t Y~L C333 ~L ~ zKK K    J" ";Z(XY)` A1(Z)Z(ZA1) A2(Z) A2 ( (A2 ) (  ,p:(,H) " CHLAPEC";  d(   ,p:(,H) " DEVCE";  d ( (Z )\ P(2  ,p:(,/)< " NEURCENO"; F d(P  , :(, )Z " DVOJCATA";d K x n  xKJJ J@  Y    : "SPLETL JSTE SE,TAKOVE DATUM NEPOCITAM !" : ;   S! M@ A2@ ! M A2 ! D A1 !" M A2 6, DP(M) A1P(M) $6 DP(M) A1P(M) #@ M  A2  J Ik T T RI r^ I h | rS |  SSSP(M)D M@  IM @ SSP(I) IKTR JR T, (J (J))   SS JSSK6 `}&A1$"O2C2R0C2R0C2R0 C7R5C2R0C2R0C2R0 C7R5C2R0C2R0C2R0 C4R1C2R0C2R0C2R0C4R1C2R0C2R0C2R0 C4R1C2R0C2R0C2R0C4R1C2R0C2R0C2R0"[0A2$"O2R6 R8R6 R8R6 E4R1E2R0E2R0E2R0E4R1E2R0E2R0E2R0 E4R1E2R0E2R0E2R0E4R1E2R0E2R0E2R0"?:A3$"O2R6 R8R6 R8R6 R9R5 G4R1G2R0G2R0G2R0G4R1G2R0G2R0G2R0"D A1$;A2$;A3$N @;XA1$"O3+C7B6#F3 A5G5F5D5 C6-B1C1D5-G4D1 E5R5-G3C3E3G3"0bA2$"O3E7#D6#D3 #F5E5D5O2A5 G8F5 +C5C3E3R7""lA3$"O2A7B7 E7A5D5 E7G7 G5R8"v A1$;A2$;A3$3A1$"O3+C7B6#F3 A5G5F5D5 C6-B1C1E5D4E1 D7C5R5")A2$"O3E7#D3#D3 #F5E5D5O2A5 G9 G8R5"'A3$"O2A7B7 E7A5D5 G7D5F5 -G7C5R5" A1$;A2$;A3$DA1$"O3C6C1R1C5C1R1C3 E5D5O2B5G5 G6O3C2C0R0C6E2E0R0 E5D5O2B5G5">A2$"O2G6G1R1G5G1R1G3 +C5B5F7 E6G2G0R0G6+C2+C0R0 +C5B5F7"@A3$"O2E6E1R1E5E1R1E3 G5F5D5-B5 C6E2E0R0E6G2G0R0 G5F5D5-B5" A1$;A2$;A3$>A1$"O3-G6E2E0R0E6G2G0R0 G7F5E5 D5#C4E1D5-A4C1 -B5G5A5B5"9A2$"O3-E6C2C0R0C6E2E0R0 E7D5C5 C5O2A4R1A5D5 G7A5B5":A3$"O2C6G2G0R0G6+C2+C1 A6A1R1A7 A5F5#F7 D5-G5-A5-B5" A1$;A2$;A3$HA1$"O3+C7B6#F3 A5G5F5D5 C6-B1C1D5-G4D1 E5C2R0E2R0G2R0C2R0E2R0G2R0"+A2$"O3E7#F6D3 #F5E5D5O2A5 G8F5 +C5R8"D A3$"O2+C7+#D6B3 +#D5B5A5D5 E7-B7 G5O1C2R0E2R0G2R0C2R0E2R0G2R0" A1$;A2$;A3$1 A1$"O3+C7B6#F3 A5G5F5D5 C6-B1C1E5D4E1 D7C7".*A2$"O3E7#F6#D3 #F5E5D5O2A5 G7+C5B5 B7G7".4A3$"O2+C7+#D6B3 +#D5#A5A5F5 E7G5F5 F7E7"> A1$;A2$;A3$HR  ,p\(,H )