Program Untuk Menghitung Nilai Rata-Rata

Nilai rata-rata adalah hasil dari penjumlahan dari sekelompok data dibagi dengan banyaknya data dalam kelompok tersebut. Nilai rata-rata didefinisikan dengan rumus :

                                 X = (N1 + N2 + N3 + ………Ni)/ Y,

 dimana :

  X adalah nilai rata-rata 

  Y adalah banyaknya data.

  Ni adalah data ke i
 

atau     

        X = Total/ Y, 

dimana Total = N1 + N2 + N3 + ………Ni

Algoritma untuk mencari Nilai X adalah :

1.Mulai
2.Deklarasikan variabel N, X,Y, Total
3.Tentukan Nilai awal Total = 0
4.Tentukan banyaknya data (Y)
5.Input Nilai Ni dalam loop
6.Hitung total data. Total = Total + Ni dalam loop
7.Hitung Nilai rata-rata. X = Total/Y
8.Cetak hasil X.
9.Selesai

Flowchart (Bagan Alir Proses)

Listring program adalah sebagai berikut :

program Nilai_rata;
uses crt;

var x,total : real;
    i,y : integer;
    n : array [1..20] of real;

Begin
  clrscr;
  total:=0;
  write('Input jumlah data = ');readln(y);
  for i:=1 to y do
  Begin
     write('data',i,'= ');
     readln(n[i]);
     total:=total +n[i]
  End;
  x:=total/y;
  writeln('Nilai rata-rata = ',x:0:2);
  readln;
End.
 

 

Setelah memahami dengan benar tentang algoritma dan cara kerja program nilai rata-rata, maka anda dapat mengembangkan kemampuan pemrograman anda dengan mengaplikasikan program nilai rata-rata.

Semoga bermanfaat.
God bless you all.