Program Pascal : Kalkulator Mencari Nilai rata-rata contoh kode Procedure dan Array

Kalkulator Nilai Rata-Rata --- Menghitung nilai rata-rata dari kumpulan nilai merupakan hal yang membutuhkan lumayan banyak waktu untuk mencarinya secara manual. Makanya sekarang beredar berbagai aplikasi yang memberikan kemudahan dalam melakukan perhitungan nilai rata-rata. Nilai rata-rata diperlukan untuk menghitung sebuah nilai sesuatu mencapai nilai yang ditargetkan, nilai rata-rata berkaitan dengan seseorang Mahasiswa atau siswa, karena ini berhubungan dengan nilai yang didapat dari dosen atau gurunya. Kita bisa dengan mandiri mencari nilai kita dengan menghitung nilai rata-rata dengan melakukan pemrograman.

Berbagai bahasa pemrograman bisa kita gunakan untuk membuat kalkulator nilai rata-rata dengan algoritmanya masing-masing. Namun dalam artikel ini akan menggunakan Pascal, dalam membuat program pascal banyak algoritma yang bisa digunakan, saya menggunakan Procedure dan array sebagai penampungan datanya, jadi program berikut bisa menjadi contoh program pascal menggunakan Procedure dan array.

Berikut kode Program Pascal dengan Procedure dan Array membuat kalkulator nilai rata-rata.

Program rata_rata_kumpulan_nilai;
Uses wincrt;
Var
Banyak_nilai,urutan: integer;
Procedure rata2(a,b:integer);
Var
Nilai:array [1..999] of Integer;
Rata_rata:real;
Jumlah:integer;

Begin
For a:=1 to b do
Begin
Write ('Nilai ke-',a,' = ');readln (nilai[a]);
End;
Jumlah:=0;
For a:=1 to b do
Jumlah:=jumlah+nilai[a];
Rata_rata :=jumlah/5;
Write ('Rata-rata  = ', rata_rata:0:2);               
End;

Begin
writeln('            Program Menghitung Nilai Rata-Rata');
writeln('==========================================================');
Writeln;
Write ('Banyak nilai yang ingin diratakan = ');readln(banyak_nilai);
Rata2(urutan,banyak_nilai);
readln;
End.

Hasil Running

Nah, seperti itu hasil kalkulator nilai rata-rata yang sudah dibuat berdasarkan algoritma diatas, algoritma yang digunakan bisa berbeda-beda setiap pembuat program. Namun program diatas bisa digunakan sebagai contoh untuk pembelajaran program pascal dengan Procedure dan Array.

Sekian. Wassalam

Bagikan ke:

Facebook Google+ Twitter

• Program Pascal : Kalkulator Mencari Nilai rata-rata contoh kode Procedure dan Array
• Pascal : Menentukan Tahun Kabisat yang mengirimkan sebuah Boolean dengan Function
• Pemrograman Pascal : Mengenal Nilai Genap dengan Array
• Pascal : Membuat Perhitungan Gaji dengan Turbo Pascal
• Pemrograman Pascal : Contoh Array 1 dimensi
• Pascal : Menghitung nilai Jajar Genjang dengan Turbo Pascal For Windows (TPW 1.5)
• Pascal : Penggunaan script Repeat Until dan Case Break
• Pascal : Membuat Program Menghitung detik menggunakan DIV MOD
• Pascal : Program Konversi Suhu menggunakan Case
• Mempelajari Algoritma Pemrograman Berorientasi Objek dikenal OOP
• Web : Cara mengatur Paragraf html code menjadi lebih teratur
• HTML : Belajar HTML Memasukkan link Bahasa Pemrograman WEB
• Belajar HTML Pemrograman Web
• Download Turbo Pascal for Windows (TPW 1.5)
• Pemrograman Pascal : Program Kalkulator Kali, Bagi, Jumlah dan Kurang
• Mengenal Bahasa Pemrograman Pascal
• Program Pascal : Belajar Coding Dasar Membuat Program Pascal Hello
• Pemrograman Pascal : Contoh Coding Pemrograman Dasar Pascal Perulangan While Do
• Pascal : Cara membuat Program Generator Tulisan Terbalik
• Aplikasi Free Pascal Download Gratis disertai Cara Download dan Cara Instal Lengkap