Algoritma Mencari Nilai Rata-Rata
Berikut ini adalah pseudocode dari Algoritma Mencari Nilai Rata-Rata
Deklarasi
x,total : real;
i,y : integer;
n : array [1..20] of real;
Deskripsi
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);
readln;
End.
Deklarasi
x,total : real;
i,y : integer;
n : array [1..20] of real;
Deskripsi
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);
readln;
End.
Kemudian Berikut ini penjelasan dari pseudocode di atas :
- mempersiapkan variabel x, total bertipe data real
- mempersiapkan variabel i, y bertipe data integer
- mempersiapkan array n bertipe data real
- 0 merupakan nilai awal total
- Perintah memasukan jumlah data yang nanti akan di tampung di variabel y
- Perintah pengulangan dari i=1 to y
- perintah memasukan nilai array n[i] sebanyak y
- nilai variabel total adalah hasil penjumlahan semua data n[i] sebanyak y
- berhenti perintah pengulangan
- nilai variabel x adalah nilai total dibagi nilai y
- perintah menampilkan nilai rata-rata yang dimana disini sebagai variabel x
- selesai
Tidak ada komentar untuk "Algoritma Mencari Nilai Rata-Rata"
Posting Komentar