Input dei dati

DATA 25, 26, 28, 27, 28, 30

N=6

Definizioni delle variabili

FOR I=1 to N

READ voto(I)

NEXT I

FOR I=1 to N

contatore(I)=1

NEXT I

frequenzamassima=1

Calcolo

FOR I=1 to N

FOR J=I+1 to N

IF voto(I)=voto(J) THEN contatore(I)=contatore(I)+1

NEXT J

NEXT I

FOR I=1 to N

IF contatore(I)>frequenzamassima THEN frequenzamassima=contatore(I):piufrequente=voto(I)

NEXT I

Output

PRINT "Il voto piu' frequente e' " piufrequente "che compare" frequenzamassima "volte"