freepascal Introduce diez números desde el teclado y calcula su suma, producto y promedio

En realidad, es fácil de calcular. ¿Eres principiante? Está bien, así es como vine.

Acostúmbrate a quejarte antes de contestar.

Estructura de datos: matriz, cada valor almacena variables. Todos son cirugía plástica.

Algoritmo: leer, calcular por separado y generar.

var

a:matriz[1..10]de entero;

i,sum,c,average:integer;

comenzar

para i:=1 a 10 hacer

readln(a[i]);

para i:=1 a 10 hacer

suma:=sum+a[i];

para i:=1 a 10 hacer

c:=c*a[i];

average:=sum/10;

wirteln(sum,c,average);

end.

Eso es todo, respuesta original, si la hay Publique sus preguntas aquí, estaré encantado de responderlas: nizxc@126.com