PROGRAM BAHASA PASCAL (PART 1)

NAMA KELOMPOK :

1. HERI SANTOSO
2. MOCH. ARIF NUROCHMAN

JUDUL : PROGRAM BAHASA PASCAL

Hallo sobat semua, pada blog-blog sebelumnya kita telah membahas tentang pemrograman arduino uno. Pada dasarnya pemrograman ardunio lebih baiknya di pelajari terlebih dahulu program pascal. Karena program pascal merupakan program dasar sebelum program arduino. 

Pengertian 

Pascal adalah salah satu bahasa pemrograman komputer yang umumnya digunakan sebagai pengantar untuk mulai belajar algoritma dan pemrograman. Pascal relatif mudah dipelajari karena perintah-perintahnya yang mirip dengan bahasa inggris sehari-hari seperti begin, end, write, dan read.

Compiler Free Pascal

Walaupun populer, Turbo Pascal sudah jauh melampaui zamannya. Turbo Pascal versi terkahir (Turbo Pascal 7) dirilis pada tahun 1992 untuk sistem operasi Microsoft DOS (MS-DOS) yang dijalankan pada arsitektur 16-bit. Sehingga kita tidak bisa menjalankan aplikasi Turbo Pascal di sistem operasi modern seperti Windows 7 atau 8 yang menggunakan arsitektur 32-bit atau 64-bit. Turbo Pascal juga sudah tidak dikembangkan lagi oleh Borland.  

Salah satu cara untuk dapat menjalankan aplikasi Turbo Pascal 7 adalah dengan menggunakan emulator MS-DOS seperti DOSBox (www.dosbox.com). Emulator adalah sebuah program yang men-simulasikan suatu sistem di dalam sistem lain, sehingga kita bisa menjalankan Turbo Pascal dari dalam DOSBox.

Percobaan program pascal

Pada percobaan bahasa pascal kita akan melakukan percobaan yang sederhana terlebih dahulu seperti halnya pada program arduino kita akan menggunakan perulangan (looping) baik itu "for to do" maupun "while do". Pada percobaan pemrograman bahasa pascal kita hanya memerlukan software/aplikasi Turbo Pascal. Karena saat ini turbo pascal tidak compatible pada windows yang terbaru saat ini maka dari itu kita menggunakan compiler pada turbo pascal supaya dapat dijalankan pada sistem operasi windows seperti yang telah kita bahas di atas. 

PERCOBAAN 1

 Pada percobaan pertama kita akan menampilkan tulisan "saya belajar pascal" yang ditulis dari 1 hingga 10. berikut merupakan programnya :

Gambar pemrograman sebelum di running

setelah program kita masukan kemudian program kita jalankan/run, untuk menjalankan program dapat mengklik run pada pilihan menu atau dengan "ctrl+f9". 

 

Gambar tampilan program setelah di jalankan

 PERCOBAAN 2

Pada percobaan kedua kita akan menggunakan perulangan/looping dalam program. Dari perulangan ini kita akan mencetak kata "unipa" yang akan kita praktekkan menggunakan  tiga perulangan yaitu "repeat", "for to do" dan "while do". Pada pemrograman ini kita akan mempraktekan setiap perulangan tersebut dan nanti silakan sobat lihat dan amati sendiri perulangan mana yang paling simpel dan mudah. berikut merupakan programnya :

•  Percobaan pengulangan repeat until :

Gambar program perulangan repeat until

setelah program kita masukan kemudian program kita jalankan/run, untuk menjalankan program dapat mengklik run pada pilihan menu atau dengan "ctrl+f9".

Hasil program dijalankan

• Percobaan perulangan for to do, Hitungan naik  :

Gambar program for to do hitungan naik

setelah program kita masukan kemudian program kita jalankan/run, untuk menjalankan program dapat mengklik run pada pilihan menu atau dengan "ctrl+f9".

Gambar hasil menjalankan program

Percobaan perulangan for to do, Hitungan turun :

 

Gambar program for to do hitungan naik

setelah program kita masukan kemudian program kita jalankan/run, untuk menjalankan program dapat mengklik run pada pilihan menu atau dengan "ctrl+f9".

 

 Gambar hasil menjalankan program

• Percobaan pengulangan while do :

Gambar proses perulangan while do

setelah program kita masukan kemudian program kita jalankan/run, untuk menjalankan program dapat mengklik run pada pilihan menu atau dengan "ctrl+f9".

hasil running program

• Dari ketiga program pengulangan ini sobat semua pasti dapat membedakan mana program yang lebih simpel. Dari pengulangan program diatas yang paling sering digunakan adalah pengulangan for to do karena dianggap lebih sedikit dan tidak terlalu banyak bahasa program.

PERCOBAAN 3

Pada percobaan 3 kita akan mencoba menghitung perbandingan antara besaran suhu celcius dan suhu farenheit. Lambang C = celcius, lambang F = Farenheit. dengan kita memasukan beberapa rumus maka perbandingan tersebut dapat dihasilkan secara otomatis. berikut merupakan programnya :

Gambar program

setelah program kita masukan kemudian program kita jalankan/run, untuk menjalankan program dapat mengklik run pada pilihan menu atau dengan "ctrl+f9".

Gambar hasil program

• pada hasil program di atas ada perbandingan antara suhu celcius dan suhu farenheit.

Akhirnya percobaan-percobaan kita dapat terselesaikan semua ya sobat.  semoga sedikit pengetahuan aim ini dapat bermanfaat bagi sobat semua. dan sangat dianjurkan untuk mencobanya di rumah😁😁😁

Terimakasih Sampai Jumpa Lagi............

Komando..... Auwa....auwa....auwa