Page 322 - Introduccion a la Programacion

322 Introducción a la Programación

PRUEBA DE ESCRITORIO

CEREALES
toneladas [] sumaTonelada mayorMedia menorMedia media
0
0
<<. 0 0 0 0
0
0
1
2
<<. 78 6 6 6.5
11
12

ALGORITMO EN PseInt
RUEBA DE ESCRITORIO EN PseInt

1. /* Construye un algoritmo que proporcione la siguiente
información:
2. * El promedio anual de toneladas de cosechas
3. * Cuántos meses tuvieron una cosecha superior al promedio
anual.
4. * Cuántos meses tuvieron una cosecha inferior al promedio
anual.
5. //
6. Algoritmo CEREALES
7. DEFINIR sumaTonelada, mayorMedia, menorMedia Como ENTERO;
8. DEFINIR media Como REAL;
9. DIMENSION toneladas[12];
10. PARA i <- 1 HASTA 12 CON PASO 1 HACER
11. . ESCRIBIR “Ingrese las toneladas del mes:”;
12. . LEER toneladas[i];
13. . sumaTonelada <- sumaTonelada + toneladas[i];
14. FINPARA
15. media <- sumaTonelada / 12;
16. PARA j <- 1 HASTA 12 CON PASO 1 HACER
17. . SI (toneladas[j] > media) ENTONCES
18. . . mayorMedia <- mayorMedia + 1;
19. . SINO