- Read - Readln Deyimleri

Yazım İçin Format Belirleme :Writeln deyimi ile yapılan bilgi çıkışlarını düzenlemek için yazım formatları kullanılır. Yazdırılmak istenilen değerin tipine bağlı olarak iki farklı yazım formatı kullanılır.

1. Yazım Formatı (M:n) :Bu yazım formatına göre yazdırılmak istenilen M değeri n karakterlik alanda sağa dayalı olarak yazılır. M değerini oluşturan dijit veya karakterin uzunluğu n sayısından küçük ise, aradaki fark kadar sol tarafta boşluk bırakılır. M değerinin uzunluğu n sayısına eşit veya büyük ise yazdırma işlemi format belirtilmemiş gibi gerçekleştirilir.

Örnek 1:

uses crt;

const

i:integer=567;

b:boolean=true;

c:char='b';

h:string[10]='nasılsınız';

begin

writeln('123456789');writeln;

writeln(i:9);writeln(b:9);

writeln(c:9);writeln(h:9);

writeln(i:2);writeln(h:5);

end.

Programın Çıktısı

- Write - Writeln Deyimleri

Write-Writeln :

Pascal programlama dilinde yazma işlemi için WRITE ve WRITELN komutları kullanılmaktadır. Bu komutların genel kullanım yapısı şu şekildedir;

Write(A1,A2,A3,...,An)

Writeln(A1,A2,A3,...,An)

İki kullanım şekli arasındaki fark, Read ile Readln arasındaki fark gibidir.

Var

s,a,n:integer;

begin Programın çalıştırılmasıyla elde edilen sonuç; 395 olacaktır.

s:=3;a:=9;n:=5;

Write(s); Write(a); Write(n);

end.

3

Aynı değişkenleri Writeln ile yazdırdığımızda; 9

5 olur.

- Formatlı Yazdırma

Yazım İçin Format Belirleme :Writeln deyimi ile yapılan bilgi çıkışlarını düzenlemek için yazım formatları kullanılır. Yazdırılmak istenilen değerin tipine bağlı olarak iki farklı yazım formatı kullanılır.

1. Yazım Formatı (M:n) :Bu yazım formatına göre yazdırılmak istenilen M değeri n karakterlik alanda sağa dayalı olarak yazılır. M değerini oluşturan dijit veya karakterin uzunluğu n sayısından küçük ise, aradaki fark kadar sol tarafta boşluk bırakılır. M değerinin uzunluğu n sayısına eşit veya büyük ise yazdırma işlemi format belirtilmemiş gibi gerçekleştirilir.

Örnek 1:

uses crt;

const

i:integer=567;

b:boolean=true;

c:char='b';

h:string[10]='nasılsınız';

begin

writeln('123456789');writeln;

writeln(i:9);writeln(b:9);

writeln(c:9);writeln(h:9);

writeln(i:2);writeln(h:5);

end.

Programın Çıktısı

Benzer Yazılar: