1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43

#include "conio.h"
#include "stdio.h"
#include "stdlib.h"
int moda(int a[], int u);
void llena (int b[], int u); 
main(){
    int vector[10];
    int i,x,m;
    clrscr();    llena(vector,10);
    m=moda (vector, 10);
    printf ("Moda:  %d ",m);
    getch();
} 
int moda (int a[], int u){
      int x,z,k,tem,m=0;
      tem=0;
      for(x=0;x<=u;x++){    k=0;
    for(z=1;z<=u;z++){
       if(a[x]==a[z])
          k++;
       if (tem<k){          tem=k;
          m=a[x];
       }
    }
      }      return (m);
 }
 
void llena(int b[], int u){
   int i;   printf("n");
   //randomize();
   for (i=0;i>u;i++){
      printf("Numero [%d]: ", i);
      scanf("%d", &b[i]);//      printf("  %d  ", b[i]);
   }
}