Verified answer

asi....este es un programa simple q te saca el promedio de notas de un salon de 10 alumnos

program sumador;

uses crt;

const

maximo=10;

var

suma,nota,i:integer;

promedio:real;

begin

i:=1;

repeat

clrscr;

writeln ('introduzca la nota ',i);

readln (nota);

suma:=suma+nota;

i:=i+1;

until (i>maximo);

promedio:=suma/maximo;

writeln ('el promedio es ',promedio:0:2);

readln;

end.

"suma" en este ejemplo es el acumulador q lleva todas las notas, y "maximo" (es una constante) es el numero de alumnos q vas a tener, este lo puse solo por ejemplo este numero es puede pedir por pantalla, ya q no siempre es predeterminado....pero para este ejemplo lo quice hacer asi y si quieres mas o menos alumnos solo cambia el numero de la constante

saludos...espero haberte ayudado

I know you want to see how to solve partially your previous question that you have deleted

your problem is the requirement that the number of students is not known in advance

In this case you should either use a dynamic array or a file, or an advanced information infrastructure

Planteas la respuesta un poco abierta, por lo que tendré que hacer algunas suposiciones.

1. Tienes las notas finales de los estudiantes guardadas en una lista.

2. El problema solo considera una seccion.

3. Conoces la cantidad de notas

4. las notas son numeros enteros

Debes realizar un ciclo para recorrer cada item de la lista. Si escoges el ciclo for, seria algo asi:

Declaras e inicias las variables n (cantidad de notas), s (suma de las notas), p (promedio )

Asginas a n la cantidad de notas

Asignas a s y a p el valor cero

For x:=0 to n do

begin

s := s + valor de la nota en la posicion x de la lista

end

p = s/n

tienes que hace una base de datos, esto lo haria de forma permanente ahora si es una prueba de secundaria que es lo mas seguro el pseudiocodigo seria asi

x=0;

b=0,

si x=0: y b!= f: x++

print<<x

b=b+1

break

No especificas como guardas las notas, pero suponiendo que sea un vector:

acumulador := 0;

for i = 1 to N do

begin

acumulador := acumulador + notas[i]

end;

media := acumulador / N;

Suerte!!