10MODE7:PRINT"Please wait. I am think ing hard":DIMA%(2):REPEATB%=RND(2):A%(B% )=A%(B%)+1:UNTILA%(1)=10000:PRINT"Out of ";A%(1)+A%(2);" people asked, "'A%(1);" say. ""Get Married Kevin"" and "'A%(2); " say. ""Don't get married Kevin"""