Bahasa pemrograman Pascal sering kali menjadi pintu gerbang utama bagi siapa saja yang ingin mempelajari dunia coding. Struktur bahasanya yang kaku namun sistematis sangat efektif untuk melatih logika pemrograman. Artikel ini akan menyajikan berbagai contoh soal Pascal, mulai dari operasi aritmatika sederhana hingga penggunaan struktur kontrol yang lebih kompleks.
Baca juga: Memahami Konsep Pautan Seks dalam Genetika
Mengenal Struktur Dasar Pascal
Sebelum masuk ke contoh soal, penting untuk diingat bahwa setiap program Pascal memiliki kerangka dasar yang terdiri dari judul program, bagian deklarasi, dan blok utama. Ketepatan dalam penulisan titik koma dan tanda titik di akhir program adalah kunci utama agar kode dapat dikompilasi tanpa galat.
1. Contoh Soal Menghitung Luas Lingkaran
Soal pertama ini bertujuan melatih penggunaan konstanta dan tipe data bilangan real.
Pertanyaan:
Buatlah sebuah program Pascal untuk menghitung luas lingkaran jika jari-jari diinput oleh pengguna.
Kode Program:
Delphi
program HitungLuasLingkaran;
uses crt;
const
phi = 3.14;
var
r, luas: real;
begin
clrscr;
writeln('Program Menghitung Luas Lingkaran');
write('Masukkan jari-jari lingkaran: ');
readln(r);
luas := phi * r * r;
writeln('Luas lingkaran adalah: ', luas:0:2);
readln;
end.
Penjelasan:
Pada program di atas, kita menggunakan const untuk mendefinisikan nilai $pi$ tetap. Tipe data real digunakan karena hasil perkalian jari-jari sering kali menghasilkan angka desimal. Format :0:2 pada perintah writeln berfungsi untuk membatasi angka di belakang koma agar tampilan lebih rapi.
2. Contoh Soal Konversi Suhu
Logika matematika dalam pemrograman sangat krusial. Contoh soal ini akan mengonversi suhu dari Celsius ke Fahrenheit.
Pertanyaan:
Buatlah program yang menerima input suhu dalam Celsius dan menampilkannya dalam skala Fahrenheit.
Kode Program:
Delphi
program KonversiSuhu;
uses crt;
var
c, f: real;
begin
clrscr;
writeln('Program Konversi Suhu Celsius ke Fahrenheit');
write('Masukkan suhu dalam Celsius: ');
readln(c);
f := (9/5 * c) + 32;
writeln('Suhu dalam Fahrenheit adalah: ', f:0:1);
readln;
end.
Penjelasan:
Rumus konversi suhu diimplementasikan langsung dalam variabel f. Program ini melatih pemahaman operator aritmatika dan urutan eksekusi operasi matematika (tanda kurung didahulukan).
3. Contoh Soal Penentuan Kelulusan (Struktur IF-THEN-ELSE)
Struktur kendali percabangan adalah jantung dari logika pemrograman. Soal ini akan menguji pemahaman Anda mengenai pengkondisian.
Pertanyaan:
Buatlah program yang menentukan apakah seorang siswa lulus atau tidak berdasarkan nilai ujian. Syarat kelulusan adalah nilai minimal 75.
Kode Program:
Delphi
program CekKelulusan;
uses crt;
var
nilai: integer;
begin
clrscr;
write('Masukkan nilai ujian Anda: ');
readln(nilai);
if (nilai >= 75) then
writeln('Selamat, Anda dinyatakan LULUS.')
else
writeln('Maaf, Anda TIDAK LULUS. Silakan coba lagi.');
readln;
end.
Penjelasan:
Program menggunakan perintah if-then-else. Perlu diperhatikan bahwa sebelum kata kunci else, tidak boleh ada tanda titik koma pada baris sebelumnya.
4. Contoh Soal Menentukan Bilangan Ganjil atau Genap
Logika sisa bagi atau Modulo sangat sering digunakan dalam kompetisi pemrograman maupun tes masuk kerja.
Pertanyaan:
Buatlah program yang dapat mendeteksi apakah angka yang dimasukkan pengguna termasuk bilangan genap atau ganjil.
Kode Program:
Delphi
program GanjilGenap;
uses crt;
var
angka: integer;
begin
clrscr;
write('Masukkan sebuah angka: ');
readln(angka);
if (angka mod 2 = 0) then
writeln('Angka tersebut adalah bilangan GENAP')
else
writeln('Angka tersebut adalah bilangan GANJIL');
readln;
end.
Penjelasan:
Operator mod memberikan sisa hasil bagi. Jika sebuah angka dibagi 2 memiliki sisa 0, maka angka tersebut pasti genap.
5. Contoh Soal Perulangan (FOR-DO)
Perulangan digunakan untuk mengeksekusi perintah yang sama berkali-kali secara efisien.
Pertanyaan:
Buatlah program yang menampilkan angka 1 sampai 10 secara berurutan.
Kode Program:
Delphi
program CetakAngka;
uses crt;
var
i: integer;
begin
clrscr;
for i := 1 to 10 do
begin
writeln('Angka ke-', i);
end;
readln;
end.
Penjelasan:
Variabel i bertindak sebagai counter atau penghitung. Perulangan akan terus berjalan selama nilai i belum mencapai 10.
6. Contoh Soal Tabel Perkalian (Nested Loop)
Nested loop atau perulangan bersarang adalah konsep di mana ada perulangan di dalam perulangan lainnya.
Pertanyaan:
Buatlah program yang menampilkan tabel perkalian sederhana.
Kode Program:
Delphi
program TabelPerkalian;
uses crt;
var
i, j: integer;
begin
clrscr;
for i := 1 to 5 do
begin
for j := 1 to 5 do
begin
write(i * j, ' ');
end;
writeln;
end;
readln;
end.
Penjelasan:
Loop luar (i) mengatur baris, sedangkan loop dalam (j) mengatur kolom. Hasilnya akan membentuk matriks perkalian 5×5.
7. Contoh Soal Penggunaan Case-Of
Case-of adalah alternatif yang lebih rapi dibandingkan if-else yang bertumpuk untuk pilihan yang banyak.
Pertanyaan:
Buatlah program untuk menentukan nama hari berdasarkan nomor (1-7).
Kode Program:
Delphi
program NamaHari;
uses crt;
var
noHari: integer;
begin
clrscr;
write('Masukkan nomor hari (1-7): ');
readln(noHari);
case noHari of
1: writeln('Senin');
2: writeln('Selasa');
3: writeln('Rabu');
4: writeln('Kamis');
5: writeln('Jumat');
6: writeln('Sabtu');
7: writeln('Minggu');
else
writeln('Nomor tidak valid!');
end;
readln;
end.
Tips Belajar Pascal dengan Efektif
Mempelajari Pascal bukan hanya soal menghafal sintaks, tetapi melatih cara berpikir. Berikut adalah beberapa tips bagi Anda yang sedang mempelajari contoh soal Pascal:
- Ketik Kode Secara Manual: Hindari melakukan salin-tempel (copy-paste). Mengetik sendiri akan membantu otot motorik dan memori Anda terbiasa dengan struktur bahasa.
- Pahami Pesan Error: Jika compiler memberikan pesan error, baca dengan teliti. Biasanya Pascal akan menunjukkan baris mana yang bermasalah.
- Eksperimen: Setelah berhasil menjalankan contoh soal di atas, cobalah mengubah variabel atau menambahkan fitur baru untuk melihat apa yang terjadi.
- Gunakan Komentar: Gunakan tanda kurung kurawal
{ }untuk memberikan catatan pada kode Anda agar mudah dipahami di kemudian hari.
Baca juga: Rektor Universitas Teknokrat Indonesia Salurkan Donasi untuk Korban Bencana Sumatera melalui ICMI
Kesimpulan
Kumpulan contoh soal Pascal di atas mencakup dasar-dasar yang paling sering muncul dalam ujian maupun praktik pemrograman. Mulai dari input-output, operasi aritmatika, percabangan, hingga perulangan. Dengan menguasai konsep-konsep ini, Anda akan memiliki pondasi yang kuat untuk mempelajari bahasa pemrograman yang lebih modern seperti Python, C++, atau Java.
Pemrograman adalah keterampilan yang diasah melalui konsistensi. Teruslah berlatih dengan logika yang berbeda-beda agar kemampuan analisis masalah Anda semakin tajam.
Penulis: Aripin


Post Comment