Oppure

Loading
29/12/10 22:39
Archii
Devo compilare un programma di questo genere:

Inserire i voti ottenuti degli N studenti di una classe durante una verifica. Si vuole sapere:
-Il numero di insufficienze
-il numero di sufficienze
-quanti sono i voti ottimi (compresi fra 8 e 10)
-il voto medio della classe
-la percentuale di sufficienze
-il voto minimo ottenuto
-il voto massimo ottenuto e il numero dell'alunno nell'elenco di classe (posizione nella serie).

Sono riuscito a fare tutto, tranne la visualizzazione del voto minimo e del voto massimo, qualcuno saprebbe aiutarmi?
aaa
30/12/10 0:15
a_butta
Codice da cui partire?
Senza quello non si può dire niente di specifico: non so come organizzi i tuoi dati.
Supponendo che organizzi i dati in un determinato array, potresti utilizzare una funzione di sorting, estraendo il primo valore (minimo) e l'ultimo (massimo):
type TMyArray = Array[0..100] of [MioTipo];
Var Min, Max: Integer;
procedure Sort(var MyArray: TMyArray);
begin
   //Sorting Function
end;

begin
Sort(MyArray);
Min:= MyArray[0];
Max:= MyArray[High(MyArray)];
end;
Ultima modifica effettuata da a_butta 30/12/10 0:17
aaa
30/12/10 11:54
a_butta
posso chiedere il motivo del -1?
aaa
30/12/10 18:18
Archii
Devo sapere come visualizzarli, in un ciclo repeat-until
aaa
31/12/10 14:45
carmine
Per trovare il max e il min in array nn cè bisogno dell'ordinamento! semplicemente di un ciclo con un confronto
aaa