Perintah input PASCAL

Perintah input PASCAL

Perintah Input

Perintah atau statement input pada pascal berfungsi untuk memasukkan nilai dari media input komputer yang ditampung oleh variabel sebagai data nilai. Perintah input yang ada pada pascal adalah Read atau Readln. Dalam menggunakan perintah ini, harus dipersiapkan terlebih dahulu variabel sebagai penampung hasil inputan.

Variabel harus memiliki tipe data yang sama dengan nilai yang akan diinput nantinya.

Perbedaan Read dengan Readln adalah :
  • Read akan membaca data secara horizontal, dimana setelah proses input selesai, maka posisi cursor akan tetap berada di baris yang sama. Penggunaan Spasi atau Enter dapat memisahkan antara satu inputan dengan inputan lainnya.
  • Readln akan membaca data secara vertikal, dimana setelah proses input selesai, maka posisi cursor akan pindah ke baris baru berikutnya(pindah baris otomatis).Penggunaan Enter dapat memisahkan antara satu input dengan input lainnya. 
Defenisi perbedaan diatas hanya secara teori. Dalam prakteknya, kedua perintah ini akan membuat prilaku berbeda tergantung tipe data yang kita gunakan. Terutama untuk perintah read yang kadang berfungsi tidak wajar.

Kita akan melihat perbedaan kedua inputan ini melalui beberapa contoh kode program.

Contoh coding program input pascal pertama :
Program input;
Uses Crt;
Var
 nama,alamat : String;
 umur: Integer;
 ipk: Integer;
Begin
 Clrscr;
 Writeln ('Masukkan Data Mahasiswa');
 Writeln ('=======================');
 Write ('Nama :');
 Readln (nama);
 Write ('Alamat :');
 Readln (alamat);
 Write ('Umur :');
 Read (umur);
 Write ('IPK :');
 Readln (ipk);
 Writeln;
 Writeln ('=========HASIL=========');
 Write ('Nama: ',nama,'. Alamat: ',alamat);
 Writeln ('. Umur: ',umur,'. IPK: ',ipk);
 Readln;
End.

Pada contoh diatas variabel ada nama,alamat yang bertipe string , dan umur bertipe integer, ipk bertipe real.   

input pascal
pada contoh saya melakukan inputan nama dengan fajar, alamat dengan depok, umur dengan 25 dan ipk dengan 4 dan terlihat hasilnya



Contoh coding program input pascal kedua, contoh program input nomor:

Program input;
Uses Crt;
Var
 a,b,c,d : Integer;
Begin
 Clrscr;
 Writeln ('Input 4 angka, dipisah dengan spasi:');
 Read (a);
 Read (b);
 Read (c);
 Read (d);
 Writeln;
 Writeln ('Hasil Input:');
 Writeln ('a: ',a,', b: ',b,', c: ',c,', d: ',d);
 Readln;
Readln;
End.

input pascal
pada contoh saya menginput variable a dengan nilai 4, b dengan 5, c dengan 3, dan d dengan 2


Contoh coding program input pascal ketiga, contoh program input matriks :

Program input;
Uses Crt;
Var
a,b,c,d,e,f,g,h,i : Integer;
Begin
Clrscr;
Writeln ('Input Matriks 3x3');
Read (a,b,c);
Read (d,e,f);
Read (g,h,i);
Writeln;
Writeln ('Hasil Matriks:');
Writeln (a,' ',b,' ',c);
Writeln (d,' ',e,' ',f);
Writeln (g,' ',h,' ',i);
Readln;
Readln;
End.
Perintah input PASCAL
pada contoh saya input nilai a-i dengan 1-9 dan hasil matriks terlihat



Contoh coding program input pascal keempat, contoh program input hasil akhir :

Program hasilakh (input,output);
Const
 jumbil= 5;
Var
 jumakh : Integer;
 bilinput : Integer;
 index : Integer;
Begin
 jumakh := 0;
Write ('inputkan bilangannya : ');
For index := 1 To jumbil Do
Begin
Read (bilinput);
Write (bilinput);
jumakh := jumakh + bilinput;
End;
Writeln;
Write ('Hasil akhir adalah: ',jumakh);
End.

perintah input pascal
pada contoh saya memasukan bilangan 4, untuk input bilangan menjadi 4000 dikarenakan ada pengulangan for , pada materi selanjutnya akan dibahas


Contoh coding program input pascal kelima, contoh program input penjumlahan :
Program penjumlahan(input,output);
Var
jum : Integer;
bil : Integer;
index : Integer;
juminput : Integer;
Begin
Read (juminput);
Writeln ('Ada : ',juminput,'nilai yang di inputkan');
jum:=0;
Write (' Input : ');
For index := 1 To juminput Do
Begin
Read (bil);
Write (bil);
Jum := jum + bil;
End;
Writeln;
Write ('jumlahnya adalah :', jum);
End.


Perintah input PASCAL
pada contoh saya menginput 3 untuk membuat 3 inputan angka untuk ditambahkan, saya memasukan 1 4 dan 5 untuk ditambahkan, dan jumlahnya akan diketahui 10

MATERI PASCAL

Jika kalian baru dalam pembelajaran pemrograman Pascal, Silakan belajar dari materi pertama :


Artikel Terkait:
Disqus Comments