Sayfa 54

3. Sayı Yarışma Sorusunun Çözümü

PROGRAM ADI : HECELER 001980 IF FNS<X) THEN 328 PRINT 60200 THEN 27 600620 CLOSE "<HOME><CTRL-N><3DOLN a BIR TUSA B 00216 IF FNN<X) THEN ASIN...":POKE 198,B:WAIT 358 <i76> $ 002280 FNNCX) THEN 60030 EKRAN<S B:GOTO 358 <156> ERİNTER<4âSPACE BİTİRİN" <184> 90230 FNNCX) THEN 00040 GET AND AND A C:GOTO 350 <186> THEN 48 <B41> 00248 FNNCX) THEN 00050 IF THEN PRİNT D:GOTO 358 <216> AS-"2" THEN DV-4 00250 IF FNSCX) THEN "<3DOWN>CUMLE C:GOTO 350 <aB6> NIZ? < TEKRAR ICİN İRETURNİ 90260 358 <231> > 80270 FNNCX) OR FNSX DEF OR OR C$z X) THEN L-B:GOTO 350 “1* OR C&-"0O" OR C$-"U" OR C$-"A" O 08280 FNNCX) THEN R C$-z"E" OR C:6G0TO 350 DEF FNS<X)-FNSİCX) OR C$z"O" OR C$- Bö290 IF FNSCX) THEN 358 <a3e> 003080 FNS<X) THEN 980188 DEF FNNCX)-NOT AND C:GOTO 358 "> OR AND 660310 L-0:GOTO 350 <Ba5> 00116 POKE 631,34:POKE 632,34:POKE 633,20 FNNCX) OR :POKE 198,C: INPUT * <145> — THEN 350 08120 IF A$-" " THEN A$-B$ <215> 80330 FNSCX) THEN 08130 OPEN A:GOTO 358 "; 00340 L-B > 68140 SZ-LENCAS) 60350 FOR TO L-A:PRINTHA,MID$CAS,EYİ, 60150 <asa> NOT <FNNCX)) THEN PRİN 00160 IF MID$CAS,E,D)-"ELEK" OR MIDSCAS,E THA,"-"; THEN 388 <185> B03560 EzE*Lİ İF THEN 398 <B7a> 90165 NOT <FNNCX)) THE 98365 17 E<SZ THEN 168 <asa> N 198 <B88> 00370 FRINTHA:GOTO 20 001798 E>SZ THEN PRİN 00380 350 <226> THA:GOTO 28 90390 350 <147> 00180 GOTO 168 00400 GOTO 168

Cümle: Siz de mi bizim Çekoslovakyalılaştırabilemediklerimizden misiniz?

Heceleme: Siz de mi bi-zim Çe-kos-lo-vak-ya-lı-laş-tı-ra-bi-le-me-dik-le-ri-miz-den mi-si-niz?

Cümle: Trabzonlu Troleybüsçü Tramvay Nuri'nin fonksiyonları Heceleme: Trab-zon-lu Tro-ley-büs-çü Tram-vay Nu-ri'nin fonk-si-yon-la-rı Cümle: Bu yoğurdu sarımsaklasak da mı saklasak, Sarımsaklamasak da mı saklasak?

Heceleme: Bu yo-ğur-du sa-rım-sak-la-sak-ta mı sak-la-sak, Sa-rım-sak-la-ma-sak-ta mı sak-la-sak?

Cümle: Olmak ya da olmamak, işte bütün mesele bu...

Heceleme: Ol-mak ya da ol-ma-mak, iş-te bü-tün me-se-le bu...