Melirik Pascal

Tidak ada yang mampu membuat saya melirik Pascal kecuali karena seorang teman. Dia meminta dibuatkan PR tentang pemograman. Saya melihat sekilas lembaran hasil scan yang dikirimkan ke email saya dan kening saya pun mengkerut. Ini tidak mudah.

PR itu lebih kepada persoalan algoritma. Saya melihat kejanggalan dialek pemograman yang dipakai dalam lembaran kertas tugas itu.

1
2
3
4
5
6
7
8
9
10
11
12

var a, b, c: integer;
 
begin
   a := 0; while A=0 do
   begin
      Writeln; Write('Nilai a?'); Readln(a);
   end;
 
   Write('b?'); Readln(b); Write('c?'); Readln(c);
   Writeln('Nilai A = ',A,',',' Nilai B = ',b,',',' Nilai C = ',c); Writeln('b = ',b+c);
   Writeln('c = ', c-2);
end.

Setelah saya teliti ternyata pemogramannya menggunakan Pascal sebagai basic bahasa pemogramannya.

Ada 5 soal yang diberikan. Cuma beberapa yang mampu saya jawab. Yang paling awal saya jawab adalah soal nomor 2 tentang Ibu Tati mengupas kentang. Aneh sekali, Ibu Tati dijadikan korban percobaan mahasiswa pemograman dan para mahasiswa menindas Ibu Tati dengan cara menyuruhnya mengupas kentang. Lebih parahnya lagi, instruksi yang diminta adalah dalam tipe loops while dengan tanpa nilai rujukan kapan tugas itu akan berhenti, kecuali pada intruksi jika kantong sudah kosong maka ambilkan kantong berikutnya dan kupas kentang kembali. Ibu Tati yang malang.

Pascal adalah bahasa pemograman yang bersifat compiler. Jadi yang harus saya lakukan adalah menuliskan program dan mengcompilenya. Karena itu tipe bahasa pemograman yang lawas, saya masih harus bergelut dengan DOS untuk mengcompile hasil program yang sudah saya ketikkan. Sungguh keterlaluan!

Saya mencompile semua hasil pemograman saya menggunakan software Free Pascal 2.4.4.

Ada 2 soal yang saya tidak mengerti, yaitu soal nomor 1 dan soal nomor 4.

Soal No. 1

Pada contoh penulisan type berikut
type Point(X:Real, Y:Real) -> menyatakan koordinat kartesian
Jika di deklarasikan NAMA P sebagai berikut: P:Point
Jelaskan bagaimana cara mengacu nilai yang tersimpan pada P

Soal nomor 1 itu membuat saya pusing karena saya sama sekali tidak memiliki basic sebagai mahasiswa Informatika yang mengerti tetek-bengek pemograman hingga segitunya. Yang saya pahami adalah saya membuat program dan program itu berjalan. SELESAI.

Selanjutnya adalah soal nomor 4 yang membuat saya semakin bingung. Karena saya baru belajar Pascal kurang dari 1 jam yang lalu. Sehingga membuat program yang sulit bukanlah kemampuan saya.

Soal No. 4

Buatlah algoritma dan program komputer untuk menampilkan nilai rata-rata tes maksimal 50 orang mahasiswa S1 Ilmu Komputer FMIPA USU, dengan ketentuan sebagai berikut:
– Nilai UTS = 30%
– Nilai Tugas = 20%
– Nilai UAS = 50%
Nama dan nilai ditentukan sembarang

Huff, hari Senin katanya PR tersebut harus dikumpul. Baiklah, saya akan mencoba hal yang terbaik yang bisa saya lakukan untuk kawan saya tersebut.