Pascal: Contoh Program Penggunaan Write Writeln Read Readln

Contoh Penggunaan Write Writeln Read Readln

Sedikit berbagi mengenai kegunaan dari notasi algoritma pembacaan (Read Readln)

Dan penulisan ke piranti keluaran (Write Writeln).

Write

Perintah write digunakan untuk menuliskan output, dengan posisi cursor – penunjuk aktif, terletak pada akhir output yang ditampilkan pada baris yang sama. Write menampilkan hasil tanpa ganti baris dan tampilan berikutnya akan disambung dalam baris yang sama.

Writeln

Perintah writeln digunakan untuk menuliskan output, dengan posisi cursor – penunjuk aktif, terletak pada awal baris berikutnya.Writeln digunakan untuk menampilkan tampilan perbaris, akan ganti baris untuk tampilan berikutnya. Argumen perintah writeln boleh berupa ekspresi. Contoh perintah penyajian writeln (‘Luas = ‘, luasPSP); bisa dikerjakan dengan perintah: writeln(‘Luas = ‘, panjangPSP * lebarPSP);

Write Dan Writeln dapat menerima:

• Argumen bertipe dasar, jumlah argumen bisa lebih dari satu.
• Suatu ekspresi
• Tanpa argumen

Bentuk umum penulisannya :  Write (variabel output);    Writeln (variabel output);

Read

Perintah read digunakan untuk menerima input, dengan posisi cursor – penunjuk aktif, setelah diberi input pada baris berikutnya. Read tidak membaca end of line marker. Pernyataan ini tidak akan membuang kelebihan data. Kelebihan data akan diberikan pada read atau readln berikutnya. Read tidak ganti baris, masih dalam baris yang sama.

Readln

Perintah readln tidak terlalu jauh berbeda dengan perintah read. Readln membaca end of line marker. Pernyataan ini menyebabkan kelebihan data akan dibuang (tidak diberikan ke read atau readln berikutnya). Readln juga digunakan untuk memasukkan data perbaris, artinya setelah tombol Enter ditekan, maka akan ganti baris,

• Read Dan Readln tidak dapat dipakai untuk memasukkan semua jenis data. Data bilangan, string maupun karakter dapat ditangani oleh kedua pernyataan ini.
• Perintah read atau readln dapat digunakan untuk membaca data lebih dari satu sekaligus dengan berbagai format.

Bentuk umum penulisannya : Read (variabel input) ;              Readln (variabel output);

Program 1

Program Fungsi_Dasar_Write_Writeln_Read_Readln;

Uses wincrt;

Var

   A:string;                                   

begin

   write ('A'); Read (A);

end.

Program 2

Program Fungsi_Dasar_Write_Writeln_Read_Readln;

Uses wincrt;

Var

   A:string;                                   

begin

   writeln ('A'); Read (A);

end.

Program 2 berbeda dengan program 1,yaitu penggunaan writeln pada program 2 berfungsi memindahkan kursor ke baris berikutnya.

Program 3

Program Fungsi_Dasar_Write_Writeln_Read_Readln;

Uses wincrt;

Var

   A:string;                                   

begin

   write ('A'); Readln (A);

end.

Sekilas program ini sama dengan program 1,namun sebenarnya beda yaitu pada penulisan ‘readln’.Pada program ini ketika kita masukan inputan dan enter maka kursor akan pindah ke baris berikutnya berbeda dengan program 1 yang tetap satu baris.dengan catatan kita masukan lagi pernyataan pada program di atas.

Program 4

Program Fungsi_Dasar_Write_Writeln_Read_Readln;

Uses wincrt;

Var

   A:string;                                   

begin

   writeln ('A'); Readln (A);

end.

Perbedaan dari program yang lainnya atau program 2 yang mempunyai tampilan output sama,yaitu pada kursor perintah selanjutnya  ketika menekan enter .Pada ‘read’ kita hanya bisa masukan satu nilai pada perintah selanjutnya itu sedangkan pada ‘readln’ tidak terbatas.

Program Program  diatas merupakan contoh dari penggunaan write writeln  read readln

Semoga bermanfaat.

Share this post