algoritma, pascal dan contoh pemograman pascal

Algoritma Tujuan pembelajaran : 1. Memahami pengertian algoritma 2. Mampu menulis algoritma dengan baik 3. Mengenal algoritma-algoritma yang umum dan yang populer 4. Mengenal bahasa pemrograman tingkat tinggi. ALGORITMA I. Asal Usul Kata Algoritma Kata algoritma berasal dari kata-kata di bawah ini : Al Khuwarizmi ‚ algorism ‚ algorithm (diserap dalam bahasa Indonesia menjadi algoritma) • Abu Ja’far Muhammad Ibnu Musa Al Khuwarizmi adalah seorang penulis buku Arab yang berjudul Kitab Al Jabar Wal Muqabala (Buku Pemugaran dan Pengurangan). Kata Al Khuwarizmi dibaca orang Barat menjadi algorism. • Kata algorism berarti proses menghitung dengan angka Arab [1]. Seseorang dikatakan algorist jika orang tersebut menggunakan angka Arab. • Kata algorism lambat laun menjadi algorithm disebabkan kata algorism sering dikelirukan dengan kata arithmetic sehingga akhiran –sm berubah menjadi –thm. Kata algorithm diserap ke dalam bahasa Indonesia menjadi algoritma. II. Definisi Algoritma Algoritma adalah urutan langkah-langkah logis penyelesaian masalah yang disusun secara sistematis [1]. Kata logis disini berarti benar sesuai dengan logika manusia. Untuk menjadi sebuah algoritma, urutan langkah yang ditempuh untuk menyelesaikan masalah harus memberikan hasil yang benar. Di bawah ini adalah symbol-simbol flowchart : Contoh : Algoritma MENUKAR_ISI_BEJANA {Diberikan dua buah bejana A dan B. Bejana A berisi larutan berwarna merah, bejana B berisi larutan berwarna biru.} 1. Tuangkan larutan dari bejana A ke dalam bejana C. 2. Tuangkan larutan dari bejana B ke dalam bejana A. 3. Tuangkan larutan dari bejana C ke dalam bejana B. B.Fungsi Algoritma Dengan algoritma, kita dapat mengatasi masalah dari yang sederhana sampai yang kompleks sekalipun. Namun, seorang user harus mampu membuat suatu program dengan menggunakan bahasa yang difahami oleh komputer. Sebelum disajikan dalam bentuk bahasa pemrogaman, sebaiknya kitamembuat diagram alir (Flow Chart) dan Pseudocode. Hal ini dimaksudkanagar dapat mempermudah kerja atau mempermudah dalam membuat program.Selain itu, algoritma dapat mengatasi masalah logika dan masalahmatematika dengan cara berurutan, tetapi kadang-kadang algoritma tidakselalu berurutan, hal ini dikenal dengan proses percabangan C. Kriteria Program Algoritma dalam Bidang Komputer Pada dasarnya, komputer adalah mesin digital, artinya komputer hanya bisa mengenal kondisi ada arus listrik (biasanya dilambangkan dengan 1) dan tidak ada arus listrik (biasanya dilambangkan dengan 0). Dengan kata lain, kita harus menggunakan sandi 0 dan 1 untuk melakukan pemrogaman komputer. Bahasa pemrogaman yang menggunakan sandi 0 dan 1 ini disebut bahasa mesin. Karena bahasa mesin sangat susah, maka muncul ide untuk melambangkan untaian sandi 0 dan 1 dengan singkatan kata yang lebih mudah difahami manusia biasa disebut dengan mnemonic code. Bahasa pemrogaman yang menggunakan singkatan kata ini disebut bahasa assembly. Program algoritma harus komplit, nyata, dan jelas. Meskipun tugas algoritma tidak menghasilkan solusi, tetapi proses harus berakhir hal ini disebut dengan semi algorithm (prosedur akan berjalan terus atau biasa disebut dengan perulangan). Intinya kita tidak boleh menambah masalah, akan tetapi kita harus mampu menyelesaikan masalah untuk mendapat hasil yang tepat. PENUTUP A. Simpulan Berdasarkan uraian di atas, dapat disimpulkan: 1. Algoritma adalah suatu prosedur yang tepat untuk memecahkan masalah dengan menggunakan bantuan komputer serta menggunakan suatu bahasa pemrogaman. 2. Fungsi algoritma adalah untuk mempermudah kerja atau memudahkan kita dalam membuat program atau biasa di sebut sebagai Problem Solving. Selain itu, algoritma dapat mengatasi masalah logika dan masalah matematika 3. Kriteria program algoritma harus komplit, nyata, dan jelas. Meskipun tugas algoritma tidak menghasilkan solusi, tetapi proses harus berakhir hal ini disebut dengan semi algorithm (prosedur akan berjalan terus atau biasa disebut dengan perulangan). Intinya kita tidak boleh menambah masalah, akan tetapi kita harus mampu menyelesaikan masalah untuk mendapat hasil yang tepat. Pascal (bahasa pemrograman) Pascal adalah bahasa pemrograman yang pertama kali di buat oleh Profesor Niklaus Wirth, seorang anggota International Federation of Information Processing (IFIP) pada tahun 1971. Dengan mengambil nama dari matematikawan Perancis, Blaise Pascal, yang pertama kali menciptakan mesin penghitung, Profesor Niklaus Wirth membuat bahasa Pascal ini sebagai alat bantu untuk mengajarkan konsep pemrograman komputer kepada mahasiswanya. Selain itu, Profesor Niklaus Wirth membuat Pascal juga untuk melengkapi kekurangan-kekurangan bahasa pemrograman yang ada pada saat itu. Kelebihan Kelebihan dari bahasa pemrograman Pascal adalah: • Tipe Data Standar, tipe-tipe data standar yang telah tersedia pada kebanyakan bahasa pemrograman. Pascal memiliki tipe data standar: boolean, integer, real, char, string, • User defined Data Types, programmer dapat membuat tipe data lain yang diturunkan dari tipe data standar. • Strongly-typed, programmer harus menentukan tipe data dari suatu variabel, dan variabel tersebut tidak dapat dipergunakan untuk menyimpan tipe data selain dari format yang ditentukan. • Terstruktur, memiliki sintaks yang memungkinkan penulisan program dipecah menjadi fungsi-fungsi kecil (procedure dan function) yang dapat dipergunakan berulang-ulang. • Sederhana dan Ekspresif, memiliki struktur yang sederhana dan sangat mendekati bahasa manusia (bahasa Inggris) sehingga mudah dipelajari dan dipahami. Bahasa PASCAL juga merupakan bahasa yang digunakan sebagai standar bahasa pemrograman bagi tim nasional Olimpiade Komputer Indonesia (TOKI). Selain itu, Bahasa PASCAL masih digunakan dalam IOI (International Olympiad in Informatics). Tipe Data Dalam bahasa Pascal terdapat beberapa jenis tipe data yang bisa digunakan untuk sebuah variabel atau konstanta pada program. Tipe Data tersebut antara lain adalah Tipe Data Deskripsi (range variabel) Byte angka dari 0 sampai 255 Integer angka dari -32768 to 32767 Real semua nilai pecahan dari 1E-38 to 1E+38 Boolean nilai TRUE atau FALSE Char semua karakter dari tabel ASCII String semua huruf, spasi, frasa Contoh gambar pascal: Contoh Program Pascal Program Menghitung Jumlah Bilangan Perulangan FOR Dengan Nilai Statis Skrip Program Pascal Output Program program jum_bil; uses wincrt; var i, jum,bil: integer; begin jum:=0; {inisialisasi} for i:=1 to 5 do begin write(‘Masukkan Bilangan = ‘);readln(bil); jum:=jum+bil; end; writeln(‘Jumlah Bilangan = ‘,jum); end. Masukkan Bilangan = 12 Masukkan Bilangan = 12 Masukkan Bilangan = 12 Masukkan Bilangan = 12 Masukkan Bilangan = 12 Jumlah Bilangan = 60 Program Menghitung Jumlah Bilangan Perulangan FOR Dengan Nilai Dinamis Skrip Program Pascal Output Program program jum_bil2; uses wincrt; var i, n: integer; jum, bil: real; begin write(‘Banyak bilangan : ’);read(n); jum := 0; For i:= 1 to n do begin write(‘Masukkan Bilangan ‘,i, ‘=’);read(bil); jum := jum+bil; end; writeln(‘Jum = ‘,jum:0:2); end. Banyak bilangan : 3 Masukkan Bilangan 1 = 12 Masukkan Bilangan 2 = 13 Masukkan Bilangan 3 = 14 Jum = 39.00 Program Menghitung Jumlah dan Mean Bilangan Perulangan FOR Dengan Nilai Dinamis Skrip Program Pascal Output Program program contoh_3; uses wincrt; var n, i : integer; rata : real; jum, bil : integer; begin Write(‘Masukkan nilai N = ‘);readln(n); writeln (‘Nilai N adalah= ‘,n);writeln; for i := 1 to n do begin write(‘Masukkan bilangan : ‘);read(bil); jum := jum+bil; end; rata := jum/n;writeln; writeln(‘Jumlahnya adalah : ‘,jum); writeln(‘Nilai rata-ratanya :’, rata:0:2); end. Masukkan nilai N = 3 Nilai N adalah= 3 Masukkan bilangan: 1 Masukkan bilangan: 2 Masukkan bilangan: 3 Jumlahnya adalah : 6 Nilai rata-ratanya : 2.00 Program Menghitung Jumlah dan Banyaknya Data Script Program Pascal Output Program Pascal program contoh4; uses wincrt; var n, i,byk,jum, bil : integer; begin Write(‘Masukkan nilai perulangan : ‘);readln(n); Writeln; for i := 1 to n do begin write(‘Bilangan ‘,i,’ = ‘);read(bil); if bil >= 10 then begin byk := byk+1; jum := jum+bil ; writeln; writeln(‘banyak bilangan yang >= 10 : ‘,byk); writeln(‘jumlah bilangan yang >= 10 : ‘,jum); Contoh Program Pascal If Perhitungan Gaji Contoh Penghitungan Gaji Ketentuan Soal : 1. Nama Di input 2. Jabatan di input , Jabatan Gaji Tunjangan Direktur 3000000 10 % dari gaji Manager 2000000 5% dari gaji Karyawan 1000000 2% dari gaji OB 800000 1% dari gaji 3. Dikenakan PPN 10 % dari gaji 4. Gaji Bersih didapat dari : gaji + tunjangan – PPn Jawabannya: Uses crt; Var nama:string[20];jabatan:string; Gaji:longint; Tunj,ppn,gajibersih:real; Contoh gambar pemograman pascal: