1 Ağustos 1986 Tarihli Commodore Gazetesi Sayfa 52

B X $ Sonunda X -216.689825 ve 1523 n 1 1 olarak hesaplanır ve print edilir. 0 250 Üx-500 AX—|400'4 x? — (Pisagor B X g XB — |600? 4 (1000- x )? teoreminden) 0 125 250 Bataklığı 0X-250 | seçme süresi - Sİ S AX saat X s Normal yeri 3000 ö — ça seçme adresi — 52 > XB saaf 125 187-5 250 5000 ÜX— 125 Toplam süre —- S1 -4 52 10 E-A:5z1ffd 15 KsB*4*(5-Bİ/etls1Iti 20 YİZSORCİRAAMA*CK-İIİZI”/E*SURCERARMAA*CİRAİ- Programda yukardaki sistem kulla- nılmıştır. Yalnız Y değerleri toplam sürenin 1000 katı olarak hesaplanır. Çünkü her iki Y değerini de 1000'e bölmek kıyaslamayı etkilemediğinden bu işleme gerek yoktur. D Adres: Mustafa ATA Rüştüsarp Cad. Gonca Sok. Gönca Api. No: 4/8 Küçükyalı/İstanbul -A)12)/5 5 YesS5üRl1GAAdA*CKAİ)12)/34*50R(536AAAA*3999-X)12)/5 30 IF Yi<Y2 THEN 5-75-(5-6)/2 35 I1F YiğYe THEN B-B4*65-Bİ/8 40 IİF OÜR<SOR THEN ÖK-AESGOTO 15 453 PRIİNT “MİNİMÜM DEĞERİ VEREN K-z"B4*(S5-B)/E SA PRIİNT “IİTERASYON SAYIŞZI-"I Sayın Commodore Dergisi İlgilileri, Derginizin 5. sayısında yayınlanan Jyarışma sorusunu çözdüğümü sanıyorum. Basic programına esas olan denklem ve bu denklemin parçalanmış halde yer aldığı program aşağıdadır. Ödül olarak verilen Türkçe Reference Guide kitabını kazandığını umarım. Saygılarımla, H.Ahmet Kurşun Adres: T. Emlak Kredi Bankası Fen Servisi Bornova-İzmir DENKLEM: TIME- ( X?4- 400? BASIC PROGRAM: 10 V- 60/1000:0 — 160000: W — 360000:Y -— 1000 20 DEF FNA(X)- ((SOR(X*X 4 O)) * /3) 4 ((SOR(Y-X)* (Y-X) 4 W3)/5))*V 30 NIM - FNA(0) 40 FOR X-.I TO 1000 STEP .I 5SO1FMIN FNA(X) THEN MIN- FNA(X):XM- X 60 NEXT 70 PRINT “EN KISA SÜRE İÇİN X'İN DEĞERİ-”; XM 80 PRINT “EN KISA SÜRE .— ”; MIN 90 END * (1000-X)*4 600?) 4 60 100 (Dk.) NETİCE: XM->216.70 m. MIN — 20.94 dk. 52 REKLAM TARİFESİ TARİFE: Arka kapak : 750.000 TL. — Renkli- -lake baskılı Ön iç kapak : 500.000TL. — Renkli Arka iç kapak :400.000 TL. — Renkli İç sayfalar —: 250.000TL. — Renkli Orta iki sayfa: 600.000 TL. — Renkli İç sayfalar —: 150.000TL. — Siyah/ a beyaz İç sayfalar 3: 75.000TL. — Siyah/ beyaz İç sayfalar 4: 40.000TL. — Siyah/ beyaz Reklam Rezervasyonları: Silahhane Cad. No: 59 Ralli Apt. 80200 Teşvikiye/İstanbul Tel: 1311550 (5 hat) Tüm bayilerde İLE PROGRAMLAMA HöriYtlke Mikhesl DYRAL | Yüepdör M Marmi TUXÇ LTA0, Öğesiler Göevvilel ÜT0 Öğecilm Üyesi