Commodore sayı 14, sayfa 45
Sayfanın metni

Sayfa 45

PROGRAM prog-ismi (INPUT,OU- TPUT); CONST sabit — değer;

,»

”»

sabit — değer; VAR değişken-listesi: veri tipi;

”

» değişken-listesi: veri tipi, BEĞIN program komutu;

”»

»

END.

Çıktıların Düzenlenmesi

Şimdiye kadarki örneklerimizde yeralan sayısal sonuçlar bilimsel gösterim şekli ile yazılmıştı. Bu şekliyle çıktıların görüntüsünde çok az bir kontrolümüz olur. Yazımızın bu bölümünde çıktılarımızın isteğimize göre nasil düzenlenebileceğini anlatacağız.

Tamsayılı (INTEGER)

Değerlerin Çıktısını Düzenleme

PASCAL 'da çıktıların kontrolü as- lında oldukça kolaydır, bir çıktı satı- rının tam istediğiniz gibi görünmesi- ni sağlayabilirsiniz. PASCAL'da tam- sayılı değer virgülsüz sayı demektir, yani 30 sayısını buna bir örnek vere- biliriz, fakat 30.0 tamsayılı (INTE- GER) bir sayı değildir. Bunu aşağıda bir örnek ile göreceğiz. PROGRAM yas (ınput,output); VAR sonuç,dyıl,buyıl; BEGIN WRITE(SU ANKİ YIL NEDİR”); READIN (buyıl); WRITE ('DOĞUM YILINIZ”); READIN (dyıl); sonuç: — buyıl—dyıl; WRITELN sonuç:5,

INTEGER;

“YAŞINDASINIZ/”); END. ŞU ANKİ YIL NEDİR 1987 DOĞUM YILINIZ 1965 SİZ 22 YAŞINDASINIZ WRIİTELN komutu içinde yeralan sonuç: 5 işareti 22 rakamının bu şekilde basılmasını sağlamıştır. Şimdi size çeşitli örneklerle çıktılarınızın ne şekiller alabileceğini göstereceğiz. Örneklerimizde “Ve” işaretli bir boşluk işareti anlamına geliyor.

Format Basılan Değer (düzenleme) çıktı 234 4 70 234 234 5 70 234 :6 70 Yo -234 4 -234 -234 :5 70 -234 -234 :6 70 Yo -234 234 tuzun o Yo 70234 (Uzun değişkenin değeri 6)

WRITE Komutu

Üstteki örnek programımızda dikkatinizi çektiyse WRITE komutu ile yazdırdığımız yazı ile programa girdiğimiz veri aynı satırda. Bunun sebebi WRITE komutu işlendikten sonra imlecin en son yazılan yerde kalmasıdır. Bu BASIC'teki PRINT komutuna benzemektedir. Bunun aksi olarak WRITELN komutu verilen çıktıyı yazdıktan sonra imleci bir sonraki satırın başına getirir. WRITE (çıktı-listesi) Açıklama: Çıktı listesindeki değişken veya sabitlerin değerleri basılır. Çıktı basıldıktan sonra imleç bir sonraki satırın başına ilerlemez. Aşağıdaki örneğimiz bir yolculuk sırasındaki ortalama hızı ve kilometre başına harcanan litreyi hesaplamaktadır. Programımızda hız = uzaklık/zaman ve yakıt = uzaklık/litre formüllerini kullanacağız.

PROGRAM yolculuk (ınput,output); VAR

hız, zaman, uzaklık, yakıt, litre: REAL; BEGĞIN write (MESAFE (KM):'); readIn (uzaklık); write (ZAMAN (SAAT):'); readIn (zaman); hız: — uzaklık/zaman;

writeln (ORTALAMA HIZ (KPH): “,hız:5:1); writeln (KİLOMETRE BAŞINA KULLANILAN YAKIT (LI), yakıt:5:1) END. MESAFE (KM): 100 ZAMAN (SAAT): 1.5 ORTALAMA HIZ (KPH): 66.7 BENZİNLT: 25 KİLOMETRE BAŞINA KULLANILAN YAKIT (LT)

:5:1 sembolü kesirli bir sayının beş basım yerinde gösterilmesi gerektiğini belirtir ve noktadan sonra bir rakam bulunabilir. Basılacak olan kesirli sayının noktadan sonra sadece bir rakamı basılacaktır, eğer gerçekte sayının noktadan sonra birden fazla rakamı varsa bunlar yuvarlanacaktır. İlk WRITELN komutu tarafından basılacak çıktı şu şekilde olmalıdır: ORTALAMA HIZ (KPH): XXX.X Burada X basılacak sayıların FORMAT'ını göstermektedir. Buna göre basılacak sayılar üç rakam, bir nokta, bir sayı şeklinde olacaktır. Örnekteki verilen formatta basılacak en yüksek sayı 999.9'dur. Bundan daha büyük sayıların bu format alanına sığması mümkün değildir. Bu yüzden programlarınızda vereceğiniz format alanlarını yeteri kadar geniş tutunuz, basılacak sayıların büyüklüğünden emin değilseniz bu alanları olması gerektiğinden büyük tutun. Eğer basılacak değerlerde negatif sayıların basılma şansı varsa, format alanı tanımlarken eksi işareti içinde yer ayırmayı unutmayın. Format tanımlarken kesirli bir değer için :4 şeklinde bir alan tanımlarsanız, o sayı bilimsel şekilde gösterilecek, fakat tanımladığınız alan genişliği kadar yer işgal edecektir. Aşağıda açıkladıklarımıza örnekler bulacaksınız.

Basılan Değer Format Çıktı 3.14159 1512 03.14 3.14159 3.14159 :5:3 3.142 3.14159 3.14159 :9 070-3.1E 4 00 -0.0006 :9 -0.0006 :8:5 -0.00060 -0.0006 :18:3 0706

Klavyeyle gezinmek için ← ve → tuşları.