Olimpiade Sains Provinsi (OSP) 2011 - Komputer , Nomor 38 - 40
Deskripsi untuk soal nomor 38 - 40
Perhatikan program berikut:
Var
a: array[1..100] of integer
n, jumlah, rata2: integer;
begin
sum:=0;
readln(n);
for i:=1 to n do
begin
readln(a[i]);
end;
for i:=1 to n do
{ Soal No. 38: tuliskan kode
untuk menghitung jumlah semua elemen array a
..... }
{ Soal No. 39: tuliskan kode untuk menghitung rata2 nilai elemen array a
..... }
end.
38
Tuliskan kode untuk menghitung hasil penjumlahan semua nilai yang disimpan pada array a dan disimpan pada variable jumlah di baris 13.
39
Tuliskan kode untuk menghitung hasil nilai rata-rata semua nilai yang ada pada array a dan disimpan pada variable rata2 di baris 16.
var
a: array[0..100] of integer;
function maksimum(n: integer): integer;
var
i: integer;
begin
{ Soal 40: lengkapi kode dengan algoritma untuk menentukan nilai maksimum
dari semua nilai yang disimpan pada a[0] s.d. a[N-1], dengan N>0 dan N<101 }
end;
40
Lengkapilah fungsi maksimum di atas, agar menghasilkan nilai maksimum dari array A dari indeks 0 sampai ke N-1, N>0. Tuliskan kodenya!
