Laporan Praktik Minggu Ke 8 (Pascal) Part 2

Nama :

1. Rahmandino Damar Maulana (153600065)

2. Achmad Faudzi (153600067)

Oke teman-teman... Kembali lagi di minggu ini dan kita akan melanjutkan program pascal kemarin. Dipertemuan kedua program pascal kali ini kita akan mencoba beberapa program pascal yang dapat kalian kembangkan sendiri.

Untuk bahan praktek kita kali ini masih sama dengan pertemuan sebelumnya yakni PC/Laptop yang sudah terinstal turbo pascal.

Langsung saja kita ke percobaan pertama

Percobaan pertama

Tujuan : Konversi suhu dari celcius ke fahrenheit.

Disini kita akan membuat program dimana untuk mengubah suhu dari ceslcius ke fahrenheit kalian hanya memasukkan nilai suhu. Nilainya dapat otomatis keluar karena ada rumus yang kita masukkan ke program

Langkah pengerjaannya :

1. Buka turbo pascal, pilih new.

2. Ketik program seperti dibawah ini.

3. Tes program dengan menekan tombol “CTRL+f9” pada keyboard.

4. Bila program kalian benar akan muncul seperti dibawah ini.

Percobaan Kedua

Tujuan : Mengolah data yang kita inginkan dengan menghitung jumlah total dan rata-ratanya.

Kita akan mencoba memasukkan beberapa data berupa angka sebanyak yang kita inginkan. Misal, disini kita akan memasukkan sebanyak tujuh data yang masing masing memiliki nilai. Ketuju data yang kita masukkan ini akan diproses jumlah total nilainya dan rata-ratanya.

Langkah pengerjaan :

1. Buka turbo pascal, pilih new.

2. Ketik program seperti dibawah ini.