1 Haziran 1987 Tarihli Commodore Gazetesi Sayfa 64

BURAK KİPER Döngü komutları sayesinde birden fazla kere tekrarlanması gereken ko- mut gruplarının istediğimiz sayıda tekrarlanmasını sağlayabiliriz. Mese- la hacim hesaplayan bir programımı- zın sadece bir tek cismin hacmini he- saplaması pek bir işimize yaramaz. Bu işi bir hesap makinasi ile de ya- pabiliriz, fakat döngüleri kullanarak istediğimiz sayıda cismin hacmini he- saplayabiliriz. Kısaca, bir bilgisayar programının yararlı olabilmesi için programın bazı komutlarının bir kereden fazla çalış- tırılabilmesi gerekir. Programımız bir kere de çalışsa bazı komutların bir- den fazla çalışmasını PASCAL'ın döngü komutları sağlar. Döngü komutlarını kullanırken dikkat etmeniz gereken en önemli şey, programınızı sonsuz döngülere sokmamaktadır. Bu genellikle en sık yapılan hatalardandır. PASCAL'de üç tane döngü komutu bulunmakta- dır. Sırasıyla FOR komutu, WHİLE komutu, REPEAT-UNTIL komutu. Şimdi bu komutları tek tek inceleye- ceğiz. FOR KOMUTU For komutunu anlatmanın en iyi yolu bir örnek vermek: For 1:—1 TO 5 DO WRITE '*4'; Bu ufak program çalıştığında WRITE komutu beş kez çalışmış ola- caktır, bu ufak programın çıktısı şu şekildedir: HH4 H4 Programımızdaki döngünün çevri- mi sırasında 1 değişkeninin değeri 1, ikincisinde 2'dir. 1 değişkeninin aldı- Bı değeri şu programla görebiliriz. FOR 1:—1TO 5 DO Write :3 ; çıktı şu şekıldedır 12345 14. sayımızdan hatırlanacağı gibi, komuttaki “*13” ibaresi çıktılar ara- sındaki istenen boşluğu bırakan TA komutuna denk düşmektedir . Bu çıktıyı alabilmek için BASIC dilinde aynı programı şu şekilde ya- zabiliriz. FOR 1-1 TO 5 PRINT; I: REM buradaki noktalı | virgülün amacı aynı satıra yazmaya NEKT I: REM devam etmek için- dir. Eğer bilgisayarın geri saymasını is- tersek TO yerine DOWNTO kullana- biliriz. Commodore FOR 1:—-5 DOWNTO 1 DOw WRITE 1:3 ; 54321 For komutunda döngüyü sınırla- mak için, doğrudan doğruya bir de- ğer vermek yerine aritmetik bir ifa- de de kullanabiliriz. Mesela, FOR 1:—-5*2 TO 5*3 DO WRITE (1:2); 10111213 1415 For komutunda DO dan sonra sa- dece bir komutun tekrarlanışını gör- dük, fakat istersek bir komutlar gru- bunun da tekrarlanmasını sağlayabi- liriz. Bunu yapabilmek için tekrarla- mak istediğimiz komutlar grubunu BEĞİN ve END arasına alacağız. Şimdi bu şekli bir örnekle görelim. FOR 1:—1 to 3DO BEGIN WRITE 'AB' ; WRITE 'CD.'; END ABCD.ABCD.ABCD. FOR komutunu kullanırken şuna dikkat etmek gerekir. FOR komutun- dan sonra gelecek komutla arasında olması gereken noktalı virgül, tekrar- lanmakta olan komuttan sonra ko- nur. a: FOR ı .Ü; l TO 5 DO WRITE ü:3) Usttekı örnek programı şu şekilde de yazabiliriz: a— 1.0; FOR 1:—1 TD 5 DO WRİTE 1:3 ; bi -2.0; Programlarımızda genellikle ikin- ci yazdığımız şekilde bir yazım tarzı kullanacağız. ar—-1.0;