Concetti Chiave
- Il programma raccoglie dati sugli studenti: cognome, classe, paese di provenienza e voto in informatica.
- Conta quanti studenti provengono dalla classe 3A Programmatori di Brescia.
- Calcola la media dei voti ottenuti nell'ultima verifica di informatica.
- Utilizza un ciclo "for" per iterare attraverso il numero di studenti inseriti.
- Mostra i risultati totali e la media calcolata alla fine dell'esecuzione.
program es1;
uses crt;
var nome,paese,classe:string;
nstud,voto,conta,conta2,contavoto,conta3Aprg,i:integer;
mediavoto:real;
begin
clrscr;
conta3Aprg:=0;
conta:=0;
conta2:=0;
writeln('numero studenti');
readln(nstud);
for i:=1 to nstud do
begin
writeln('nome');
readln(nome);
writeln('classe');
readln(classe);
writeln('paese di provenienza');
readln(paese);
conta:=conta+1;
writeln('voto nell''ultima verifica di informatica');
readln(voto);
conta2:=conta2+1;
contavoto:=contavoto+voto;
if (classe='3Aprg') or (classe='3A programmatori') or (classe='3a prg') and (paese='Brescia')then
conta3Aprg:=conta3Aprg+1;
end;
mediavoto:=contavoto/nstud;
writeln('gli studenti della 3A programmatori che provengono da Brescia sono ' , conta3Aprg);
writeln('la media dei voti dell''ultima verifica di info è ' , mediavoto:0:2);
readln;
end.
Accedi a tutti gli appunti
Tutor AI: studia meglio e in meno tempo
