_[D@n]_ |
|
| CITAZIONE Fare un algoritmo che legge i 10 voti di uno studente, ne calcola la media e: se la media è >= a 6, stampi la scritta promosso, altrimenti se è >= a 5 stampa recupera debito, se il voto è < a 5 allora stampa la scritta non promosso. Avrei un problema a risolvere il seguente problema con Pascal CODICE program ESERCIZIO;
uses: CRT;
var V,S,M, I: integer;
begin
clrscr;
S:=0;
for i:=1 to 10 do
begin
write('Scrivi il voto dello studente: ');
readln(V);
S:=S+V;
end;
M:=S/10;
if M>=6 then write('promosso')
else if M>=5 then write('recupera debito')
else if M<5 then write('non promosso');
readln;
end. Ho eseguito l'esercizio nella seguente maniera, ma è sbagliato,sebbene io non riesca a capire dove. Mi da due errori. |
| | |
