MEMBUAT PROGRAM BIODATA MAHASISWA MENGGUNAKAN PASCAL

-uses crt;

Yaitu di gunakan untuk memanipulasi atau pengaturan layar dalam pengetikan naskah

-var

Untuk memberi tahu variabelnya

-nama : string;

Pada variable nama terdapat tipe data string

-kelas:string;

Pada variable kelas terdapat tipe data string

-npm:string;

Pada variable npm terdapat tipe data string

-umur:string;

Pada variable umur terdapat tipe data string

-alamat:string;

Pada variable alamat terdapat tipe data string

-begin

Yaitu untuk memulai kode

-clrscr;

Untuk membersihkan tulisan yang berada di layar monitor

-write(‘masukan nama anda  :‘);

Mengetikan nama anda , dan pada ‘masukan nama anda:’ itu akan tercetak pada pascal saat di run

-readln(nama);

membaca data nama yang tadi telah di masukan tadi

-write(‘masukan kelas anda  :‘);

Mengetikan kelas anda , dan pada ‘masukan kelas anda:’ itu akan tercetak pada pascal saat di run

-readln(kelas);

Membaca data kelas yang di masukan tadi

-write(‘masukan npm anda  :‘);

Mengetikan npm anda , dan pada ‘masukan npm anda:’ itu akan tercetak pada pascal saat di run

-readln(npm);

Membaca data npm yang di masukan tadi

-write(‘masukan umur anda  :‘);

Mengetikan umur anda , dan pada ‘masukan umur anda:’ itu akan tercetak pada pascal saat di run

-readln(umur);

Membaca data umur yang di masukan tadi

-write(‘masukan alamat anda  :‘);

Mengetikan alamat anda , dan pada ‘masukan alamat anda:’ itu akan tercetak pada pascal saat di run

-readln(alamat);

Membaca data alamat yang di masukan tadi

-writeln;

Mencetak dan berlanjut pada baris bawah berikutnya

-writeln(‘nama anda adalah  :’,nama);

Mencetak data pada variable nama yang tadi diisi dan berlanjut pada baris berikutnya

-writeln(‘kelas anda   :’,kelas);

Mencetak data pada variable kelas yang tadi diisi dan berlanjut pada baris berikutnya

-writeln(‘npm anda   :’,npm);

Mencetak data pada variable npm yang tadi diisi dan berlanjut pada baris berikutnya

-writeln(‘umur anda   :’,umur);

Mencetak data pada variable umur yang tadi diisi dan berlanjut pada baris berikutnya

- writeln(‘ alamat anda   :’,alamat);

Mencetak data pada variable alamat yang tadi diisi dan berlanjut pada baris berikutnya

-readln;

Membaca semua data

-end.

Selesai programm

-Hasil ketika di run

Masukan nama anda dengan =Dhana , kelas anda=1ka23 , npm anda=11116911 , umur anda=19 dan alamat anda= bekasi villa indah permai maka hasilnya adalah nama anda adalah dhana , kelas and 1ka23 , npm anda 11116911 , umur anda 19 dan alamat anda bekasi villa indah permai .