LAPORAN
AKHIR
NAMA : FIRMAN
RAMDHANI
NPM :
12115722
KELAS : 1KA25
BARIS : 2
MATERI : PASCAL
TANGGAL : 17 MARET 2016
Paraf
( )
LABORATORIUM SISTEM INFORMASI
UNIVERSITAS GUNADARMA
2016
uses crt;
jika
statement ini di tulis, programmer bisa menggunakan perintah clrscr;
var atau
variabel
nma,npm,kls:string;
pendeklarasian
variabel nma,npm,kls dengan tipe data string
begin
awal program
yang akan dijalankan
clrscr;
hapus layar
write('Masukan
Nama Anda : '); readln(nma);
write('Masukan
NPM Anda : '); readln(npm);
write('Masukan
Kelas Anda : '); readln(kelas);
write
berguna untuk output yang di tampilkan pada layar dan readln berguna untuk
menyimpan data (Input) pada suatu variabel dan membuat garis baru, karena
diakhiri dengan tulisan ‘ln’
writeln;
digunakan
untuk membuat garis baru
writeln('Nama
saya adalah : ',nma);
writeln('NPM
saya adalah : ',npm);
writeln('Kelas
saya adalah : ',kelas);
menampilkan
kalimat yan di dalam tanda kutip (‘) dan variabel
readln;
untuk menampilkan
variabel yang berada pada writeln di atas, jika tidak memakai readln output
tidak akan keluar
end.
Untuk
mengakhiri program
Maka
saat memulai program atau ctrl+f9 akan muncul layar hitam.
Lalu
masukan Nama, NPM ,Kelas.
Dan
tekan enter
Maka
Outputnya akan keluar.
Membuat Program Luas Jajargenjang
uses crt;
jika
statement ini di tulis, programmer bisa menggunakan perintah clrscr;
var atau
variabel
a / alas ,t
/ tinggi ,luas : integer;
pendeklarasian
variabel alas ,tinggi ,luas dengan tipe data integer
begin
awal program
yang akan dijalankan
clrscr;
hapus layar
writeln;
digunakan
untuk output yang di tampilkan pada layar dan membuat garis baru
writeln(‘ PROGRAM LUAS JAJARGENJANG ‘);
writeln(‘
============================= ‘);
writeln;
write(‘Masukan Alas = ‘); readln(a);
write(‘ Masukan Tinggi = ‘); readln(t);
program
diatas, write berguna untuk output yang di
tampilkan pada layar dan readln berguna untuk menyimpan data (Input) pada suatu
variabel dan membuat garis baru, karena diakhiri dengan tulisan ‘ln’
luas :=a*t; digunakan untuk mengalikan a dan t
atau alas x tinggi
write(‘ Luas Jajargenjang
adalah ‘, luas);
readln;
digunakan untuk
output dan mengeluarkan hasil dari perkalian sebelumnya.
End. Untuk mengakhiri program tsb.
Jika sudah
selesai maka tekan CTRL + F9
Maka akan
muncul layar hitam
Lalu masukan
alas dan tinggi > enter
Maka output
dari hasilnya akan keluar.
Belum ada tanggapan untuk "LAPORAN AKHIR PRAKTIKUM PASCAL PER-1"
Posting Komentar
Blogger Yang Baik Yang meninggalkan jejak berupa komentar