Pages

Subscribe:

Rabu, 22 Agustus 2012

Modus Terbesar

Dalam ilmu statisika, dikenal suatu ukuran sebaran yang disebut dengan modus. Modus adalah data yang paling banyak muncul dalam suatu kumpulan data. Sebuah kumpulan data bisa jadi memiliki lebih dari satu modus, yaitu ketika terdapat lebih dari satu data yang jumlah kemunculannya sama.
Pak Dengklek memberikan Anda N (1 ≤ N ≤ 100.000) buah bilangan bulat yang masing-masing di antara 1 sampai 1.000. Tentukanlah modus terbesar dari bilangan-bilangan tersebut.

Format Masukan

Baris pertama berisi sebuah bilangan bulat N. N baris berikutnya berisi bilangan-bilangan tersebut.

Format Keluaran

Sebuah baris berisi modus terbesar dari kumpulan bilangan tersebut.

Contoh Masukan

6
1
3
2
4
1
4

Contoh Keluaran

4
 

So, the answer is :

 

1 komentar:

  1. Program saya hampir sama, seperti ini :

    program modus_terbesar;

    var b,c,d:integer;
    a,i:longint;

    x:array[1..1001] of integer;

    begin
    for i:=1 to 1001 do
    begin
    x[i]:=0;
    end;

    readln(a);
    for i:=1 to a do
    begin
    readln(b);
    x[b]:=x[b]+1;
    end;

    c:=0;
    d:=0;

    for i:=1 to 1001 do
    begin
    if x[i] >= c then
    begin
    c:=x[i];
    d:=i;
    end;
    end;
    writeln(d);
    end.

    Saya tidak tahu perbedaan dari program kita bang, tapi punya saya wrong answer. Kenapa ya?

    BalasHapus