lunes, 2 de junio de 2014

Notas de 12 estudiantes

         Realice un programa que permita ingresar un listado de 3 notas, a 12 estudiantes de la carrera de ingeniería en sistemas ciclo I, las notas corresponden a laboratorio 1 y 2 que equivalen al 30% cada una, así mismo al parcial final.
También debe generar:

       El nombre del estudiante que tenga la nota máxima
       El nombre del estudiante que tenga la nota mínima.
       El listado de estudiantes cuyas notas sean mayores o iguales a 7. 
Solución:
Proceso notas
Definir nombre Como Caracter;
Definir lab1,lab2,parcial,total1,total2,total3,res  Como Real;
Definir a, b como entero;
Definir may1, may2 como caracter;
Dimension nombre(12);
Dimension res(12);
a<-0;
b<-0;
Para a<-0 hasta 11 con paso 1 hacer
Escribir "ingrese nombre alumno", a+1;
Leer nombre(a);
Escribir "nota laboratorio 1";
Leer lab1;
Escribir "nota laboratorio 2";
Leer lab2;
Escribir "nota parcial";
Leer parcial;
total1<-lab1*0.30;
total2<-lab2*0.30;
total3<-parcial*0.40;
res(b)<-total1+total2+total3;
Escribir "el promedio es:", res(b);
b<-b+1;
FinPara
Si res(0)>res(1) & res(0)>res(2) & res(0)>res(3) & res(0)>res(4) & res(0)>res(5) & res(0)>res(6) & res(0)>res(7) & res(0)>res(8) & res(0)>res(9) & res(0)>res(10) & res(0)>res(11) Entonces
Escribir "La nota mayor es de:", nombre(0);
Sino
si res(1)>res(0) & res(1)>res(2) & res(1)>res(3) & res(1)>res(4) & res(1)>res(5) & res(1)>res(6) & res(1)>res(7) & res(1)>res(8) & res(1)>res(9) & res(1)>res(10) & res(1)>res(11) Entonces
Escribir "La nota mayor es de:", nombre(1);
Sino
si res(2)>res(0) & res(2)>res(1) & res(2)>res(3) & res(2)>res(4) & res(2)>res(5) & res(2)>res(6) & res(2)>res(7) & res(2)>res(8) & res(2)>res(9) & res(2)>res(10) & res(2)>res(11)Entonces
Escribir "La nota mayor es de:", nombre(2);
Sino
Si res(3)>res(0) & res(3)>res(1) & res(3)>res(2) & res(3)>res(4) & res(3)>res(5) & res(3)>res(6) & res(3)>res(7) & res(3)>res(8) & res(3)>res(9) & res(3)>res(10) & res(3)>res(11) Entonces
Escribir "La nota mayor es de:", nombre(3);
Sino
si res(4)>res(0) & res(4)>res(1) & res(4)>res(2) & res(4)>res(3) & res(4)>res(5) & res(4)>res(6) & res(4)>res(7) & res(4)>res(8) & res(4)>res(9) & res(4)>res(10) & res(4)>res(11) Entonces
Escribir "La nota mayor es de:", nombre(4);
Sino
si res(5)>res(0) & res(5)>res(1) & res(5)>res(2) & res(5)>res(3) & res(5)>res(4) & res(5)>res(6) & res(5)>res(7) & res(5)>res(8) & res(5)>res(9) & res(5)>res(10) & res(5)>res(11)Entonces
Escribir "La nota mayor es de:", nombre(5);
       sino
Si res(6)>res(0) & res(6)>res(1) & res(6)>res(2) & res(6)>res(3) & res(6)>res(4) & res(6)>res(5) & res(6)>res(7) & res(6)>res(8) & res(6)>res(9) & res(6)>res(10) & res(6)>res(11) Entonces
Escribir "La nota mayor es de:", nombre(6);
Sino
si res(7)>res(0) & res(7)>res(1) & res(7)>res(2) & res(7)>res(3) & res(7)>res(4) & res(7)>res(5) & res(7)>res(6) & res(7)>res(8) & res(7)>res(9) & res(7)>res(10) & res(7)>res(11) Entonces
Escribir "La nota mayor es de:", nombre(7);
Sino
si res(8)>res(0) & res(8)>res(1) & res(8)>res(2) & res(8)>res(3) & res(8)>res(4) & res(8)>res(5) & res(8)>res(6) & res(8)>res(7) & res(8)>res(9) & res(8)>res(10) & res(8)>res(11)Entonces
Escribir "La nota mayor es de:", nombre(8);
sino
Si res(9)>res(0) & res(9)>res(1) & res(9)>res(2) & res(9)>res(3) & res(9)>res(4) & res(9)>res(5) & res(9)>res(6) & res(9)>res(7) & res(9)>res(8) & res(9)>res(10) & res(9)>res(11) Entonces
Escribir "La nota mayor es de:", nombre(9);
Sino
si res(10)>res(0) & res(10)>res(1) & res(10)>res(2) & res(10)>res(3) & res(10)>res(4) & res(10)>res(5) & res(10)>res(6) & res(10)>res(7) & res(10)>res(8) & res(10)>res(9) & res(10)>res(11) Entonces
Escribir "La nota mayor es de:", nombre(10);
Sino
si res(11)>res(0) & res(11)>res(1) & res(11)>res(2) & res(11)>res(3) & res(11)>res(4) & res(11)>res(5) & res(11)>res(6) & res(11)>res(7) & res(11)>res(8) & res(11)>res(9) & res(11)>res(10)Entonces
Escribir "La nota mayor es de:", nombre(10);
FinSi
FinSi
FinSi
FinSi
FinSi
FinSi
FinSi
               FinSi
           FinSi
FinSi
FinSi
FinSi
Si res(0)<res(1) & res(0)<res(2) & res(0)<res(3) & res(0)<res(4) & res(0)<res(5) & res(0)<res(6) & res(0)<res(7) & res(0)<res(8) & res(0)<res(9) & res(0)<res(10) & res(0)<res(11) Entonces
Escribir "La nota menor es de:", nombre(0);
Sino
si res(1)<res(0) & res(1)<res(2) & res(1)<res(3) & res(1)<res(4) & res(1)<res(5) & res(1)<res(6) & res(1)<res(7) & res(1)<res(8) & res(1)<res(9) & res(1)<res(10) & res(1)<res(11) Entonces
Escribir "La nota menor es de:", nombre(1);
Sino
si res(2)<res(0) & res(2)<res(1) & res(2)<res(3) & res(2)<res(4) & res(2)<res(5) & res(2)<res(6) & res(2)<res(7) & res(2)<res(8) & res(2)<res(9) & res(2)<res(10) & res(2)<res(11)Entonces
Escribir "La nota menor es de:", nombre(2);
Sino
Si res(3)<res(0) & res(3)<res(1) & res(3)<res(2) & res(3)<res(4) & res(3)<res(5) & res(3)<res(6) & res(3)<res(7) & res(3)<res(8) & res(3)<res(9) & res(3)<res(10) & res(3)<res(11) Entonces
Escribir "La nota menor es de:", nombre(3);
Sino
si res(4)<res(0) & res(4)<res(1) & res(4)<res(2) & res(4)<res(3) & res(4)<res(5) & res(4)<res(6) & res(4)<res(7) & res(4)<res(8) & res(4)<res(9) & res(4)<res(10) & res(4)<res(11) Entonces
Escribir "La nota menor es de:", nombre(4);
Sino
si res(5)<res(0) & res(5)<res(1) & res(5)<res(2) & res(5)<res(3) & res(5)<res(4) & res(5)<res(6) & res(5)<res(7) & res(5)<res(8) & res(5)<res(9) & res(5)<res(10) & res(5)<res(11)Entonces
Escribir "La nota menor es de:", nombre(5);
       sino
Si res(6)<res(0) & res(6)<res(1) & res(6)<res(2) & res(6)<res(3) & res(6)<res(4) & res(6)<res(5) & res(6)<res(7) & res(6)<res(8) & res(6)<res(9) & res(6)<res(10) & res(6)<res(11) Entonces
Escribir "La nota menor es de:", nombre(6);
Sino
si res(7)<res(0) & res(7)<res(1) & res(7)<res(2) & res(7)<res(3) & res(7)<res(4) & res(7)<res(5) & res(7)<res(6) & res(7)<res(8) & res(7)<res(9) & res(7)<res(10) & res(7)<res(11) Entonces
Escribir "La nota menor es de:", nombre(7);
Sino
si res(8)<res(0) & res(8)<res(1) & res(8)<res(2) & res(8)<res(3) & res(8)<res(4) & res(8)<res(5) & res(8)<res(6) & res(8)<res(7) & res(8)<res(9) & res(8)<res(10) & res(8)<res(11)Entonces
Escribir "La nota menor es de:", nombre(8);
sino
Si res(9)<res(0) & res(9)<res(1) & res(9)<res(2) & res(9)<res(3) & res(9)<res(4) & res(9)<res(5) & res(9)<res(6) & res(9)<res(7) & res(9)<res(8) & res(9)<res(10) & res(9)<res(11) Entonces
Escribir "La nota menor es de:", nombre(9);
Sino
si res(10)<res(0) & res(10)<res(1) & res(10)<res(2) & res(10)<res(3) & res(10)<res(4) & res(10)<res(5) & res(10)<res(6) & res(10)<res(7) & res(10)<res(8) & res(10)<res(9) & res(10)<res(11) Entonces
Escribir "La nota menor es de:", nombre(10);
Sino
si res(11)<res(0) & res(11)<res(1) & res(11)<res(2) & res(11)<res(3) & res(11)<res(4) & res(11)<res(5) & res(11)<res(6) & res(11)<res(7) & res(11)<res(8) & res(11)<res(9) & res(11)<res(10)Entonces
Escribir "La nota menor es de:", nombre(10);
FinSi
FinSi
FinSi
FinSi
FinSi
FinSi
FinSi
               FinSi
           FinSi
FinSi
FinSi
FinSi
Escribir "notas mayores o igual a 7:";
Si res(0)>6 Entonces
Escribir nombre(0);
Sino
    FinSi
si res(1)>6 Entonces
Escribir nombre(1);
Sino
FinSi
si res(2)>6 Entonces
Escribir nombre(2);
Sino
FinSi
    si res(3)>6 Entonces
Escribir nombre(3);
Sino
FinSi
si res(4)>6 Entonces
Escribir nombre(4);
Sino
FinSi
si res(5)>6 Entonces
Escribir nombre(5);
Sino
FinSi
si res(6)>6 Entonces
Escribir nombre(6);
Sino
FinSi
si res(7)>6 Entonces
Escribir nombre(7);
Sino
FinSi
si res(8)>6 Entonces
Escribir nombre(8);
Sino
FinSi
si res(9)>6 Entonces
Escribir nombre(9);
Sino
FinSi
    si res(10)>6 Entonces
   Escribir nombre(10);
Sino
FinSi
si res(11)>6 Entonces
Escribir nombre(11);
Sino
FinSi
FinProceso

1 comentario:

  1. Tal ves te ayude con mi código, si uso de arrays

    Algoritmo veintidos
    max<-0;
    min<-10;
    para j<-1 hasta 5
    Limpiar pantalla;
    Escribir "No. ",j;
    Escribir "";
    Escribir sin saltar "ESTUDIANTE: ";
    Leer estudiante;
    Escribir sin saltar "Nota Laboratorio 1: ";
    Leer n1;
    Escribir sin saltar "Nota Laboratorio 2: ";
    Leer n2;
    Escribir sin saltar "Nota Parcial Final: ";
    Leer nf;
    pro=(n1*0.3)+(n2*0.3)+(nf*0.4);
    Escribir "";
    Escribir "Promedio: ",pro;
    si pro>max entonces
    maxalumno<-estudiante;
    max<-pro;
    FinSi
    si pro=7 entonces
    alumnos7<-alumnos7+estudiante+" ";
    FinSi
    Esperar tecla;
    FinPara
    Escribir "";
    Escribir "Nota máxima: ",max, " ",maxalumno;
    Escribir "Nota mínimo: ",min, " ",minalumno;
    Escribir "";
    Escribir "ESTUDIANTES CON NOTAS MAYORES O IGUALES A 7";
    Escribir "";
    Escribir alumnos7;
    Esperar tecla;
    FinAlgoritmo

    ResponderEliminar