Turbo pascal mendalami tentang read dan readln

Hyyy sobat diartikel sebelumnya saya sudah membahas tentang bahasa pascal write dan writeln agar lebih lengkap dan mahir tidak ada salahnya mempelajari read dan readln secara dalam, langsung saja kita pelajari.

• 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

Syntax : 

read(variabel);

Contoh program:

Listing Progra 1.3

program nothelloworld;

var

s : integer;

begin

write(‘not a hello world ’);

read(s);

write(s*s);

end.

• 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,

Syntax :

readln(variabel);

Contoh program:

Listing Program 1. 4

program nothelloworld;

var

s : integer;

begin

write(‘not a hello world ’);

readln(s);

write(s*s);

end.

  

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);

Ada banyak contoh yang dapat kita pelajari. Di bawah ini adalah beberapa contoh yang dapat kita pelajari dan mencobanya.

• Menggunakan Readln dan Writeln

Program MasukkanData; (*Layar*)

Var

A, B : Integer;

C : Real;

D : String[10];

E : Char;


BEGIN

(* Memasukkan data untuk masing-masing variabel *)

ReadLn(A);

ReadLn(B);

ReadLn(C);

ReadLn(D);

ReadLn(E);


(* Menampilkan data yang dimasukkan *)

WriteLn;

WriteLn(‘A = ‘,A,’ B = ‘,B,’ C = ‘,C);

WriteLn(‘D = ‘,D);

WriteLn(‘E = ‘,E);

End.


50

12345

12345

HALO

HALO JUGA

A = 50 B = 12345 C = 1.2345000000E+04

D = HALO

E = H

berikut adalah contoh penggunaan readln :

contoh hasil coddingnya :

Kesalahan Pada Programada 2 yaitu:

1. Kesalahan sintaks/tatabahasa (syntax error)

2. Kesalahan logika (logical error)