Galera estou com um problema aqui e não sei como resolver.
Em uma atividade foi pedido que, em pascal, para calcular a média de 5 alunos e mostrace quantos foram aprovados,quantos em recuperação e quantos reprovados.
Quanto a parte de mostrar a media dos usuarios eu já fiz, veja só:
Program Pzim ;
var
n1,n2,media:real;
cond:string;
i:integer;
Begin
for i:=1 to 5 do
begin
writeln(’’);
writeln(‘Digite a primeira nota’);
read(n1);
writeln(‘Digite a segunda nota’);
read(n2);
media:= (n1+n2)/2;
if(media >= 7)then
cond:=‘Aprovado’;
if(media <=6)then
cond:=‘Recuperação’;
if(media<4)then
cond:=‘Reprovado’;
writeln('A media é: ‘,media,’ e você está ',cond);
end;
End.
Agora, como faço para mostrar a quantidade de usuario aprovados,reprovados ou em recuperação? Não tenho a minima ideia de como fazer, fiz algumas pesquisas na internet mas não obtive exito. Alguem pode me ajuda???
