Pemrograman Pascal

Contoh program menggunakan bahasa pemrograman pascal :

PROGRAM KursMataUang;
uses crt;
var IDR,MYR,JPY,INR,pil,CNY,EUR:real;
BEGIN
clrscr;
writeln('Program Konversi Mata Uang');
read;
writeln('--------------------------');
read;
writeln('1.Konversi Ringgit menjadi Rupiah');
read;
writeln('2.Konversi Yen menjadi Rupiah');
read;
writeln('3.Konversi Rupee menjadi Rupiah');
read;
writeln('4.Konversi Yuan menjadi Rupiah');
read;
writeln('5.Konversi Euro menjadi Rupiah');
read;
write('Masukkan Pilihan : ',pil:1:0);
readln(pil);
if pil=1 then
begin
write('Masukkan nilai Ringgit : ');
readln(IDR);
MYR:= 2921*IDR;
Writeln('Dalam Ringgit : ',MYR:3:2);
readln;
end
else
if pil=2 then
begin
write('Masukkan nilai Yen : ');
readln(IDR);
JPY:= 106*IDR;
writeln('Dalam Rupiah : ',JPY:3:2);
readln;
end
else
if pil=3 then
begin
write('Masukkan nilai Rupee : ');
readln(IDR);
INR:= 196*IDR;
writeln('Dalam Rupiah : ',INR:3:2);
readln;
end
else
if pil=4 then
begin
write('Masukkan nilai Yuan : ');
readln(IDR);
CNY:= 1350*IDR;
writeln('Dalam Rupiah : ',CNY:3:2);
readln;
end
else
begin
write('Masukkan nilai Euro : ');
readln(IDR);
EUR:= 12063*IDR;
writeln('Dalam Rupiah : ',EUR:3:2);
readln;
end
end.

Pengalaman Kuliah di Gunadarma

         Sudah hampir 1 tahun saya kuliah di gunadarma, dan selama ini yang saya rasakan kuliah disini nyaman-nyaman saja, hal ini mungkin dikarenakan mahasiswanya asik dan ramah-ramah, walaupun banyak juga yang tidak seperti itu. Untuk pembelajaran, ada mata kuliah tertentu yang kelulusannya tergantung dengan nilai praktikum dan ada juga praktikum yang memiliki SKS sendiri.

         Dalam praktikum ini terdapat 2 macam laporan, yaitu laporan pendahuluan dan laporan akhir. Laporan pendahuluan bertujuan agar praktikan mengetahui bahan atau materi yang akan dipraktikkan. Saya sendiri lebih sering melihat laporan punya teman ketimbang mengerjakan sendiri karena walaupun jawaban saya dan teman saya sama tidak akan mengurangi nilai, tetapi untuk laporan akhir saya memilih mengerjakan sendiri terlebih dahulu dan jika saya tidak bisa baru saya bertanya pada teman. Dalam laporan akhir ini terdapat laporan hasil praktik sebelumnya dan terdapat logika praktikan mengenai listing program yang ditentukan oleh asisten lab, logika ini tidak diperkenankan sama antara 1 dengan yang lainnya. Sementara itu ada juga laporan akhir yang harus di tulis tangan agar tidak hanya copy paste.