LA Pascal I

Program I

program Penjumlahan;
uses crt;
var
   a,b,hasil:integer;
begin
     writeln('   Program Penjumlahan   ');
     writeln('-------------------------');
     write('Masukan bilangan ke 1 : ');readln(a);
     write('Masukan Bilangan ke 2 : ');readln(b);

     hasil:=a+b;

     writeln;
     write('Hasilnya adalah : ',hasil);
end.

Output :

Keterangan

·         uses crt; digunakan untuk memanggil fungsi-fungsi salah satunya clrscr; , gotoxy; dan lainnya

·         var a , b :integer; digunakan untuk mendeklarasikan adanya variabel yaitu variable a dan b dengan tipe data integer

·         begin di gunakan untuk memulai statement yang akan di jalankan

·         clrscr; digunakan untuk membersihkan layar

·         writeln; digunakan untuk menampilkan data, dan setelah itu pindah baris baru

·         write; di gunakan untuk menampilkan data, dan setelah itu tidak pindah baris

·         hasil :=a+b; merupakan statement yang digunakan untuk melakukan operasi aritmatik, dan di masukan ke dalam suatu variable yaitu variable hasil

·         readln(nama_var); di gunakan untuk menginput nilai dari suatu variable

·         readln; digunakan untuk membreak sebelum program di keluarkan

·         end. digunakan untuk keluar dari program (selesai)

Program II

uses crt;
var
   a : string;
   b : integer;
begin
     clrscr;
     writeln('Biodata');
     writeln('-----------------------------');
     write('Masukan Nama anda : ');readln(a);
     write('Masukan NPM anda  : ');readln(b);
     writeln;
     writeln;
     write('Nama anda adalah ',a);
     write(' ');
     write('dan NPM anda adalah ',b);
     readln;
end.

Output :

Keterangan :

Setelah program di jalankan, masukan nilai a dan nilai b. Dan setelah itu maka akan tampil biodata yang telah di inputkan tadi.