Hola, alguno que me ayude con mi CODIGO. Intento encontrar el numero mayor y menor basado en los numeros que tira en el matriz pero por alguna razon me esta tirando resultados diferentes en el reporte final:
Algoritmo 1_1
Definir posicion1, posicion2, Respuesta_menu, matriz,matriz1, vector1, vector2,vector3, vector4, f, c Como entero;
Escribir "Bienvenidos al Sistema de Gestion GV Ruta 27";
Escribir "Menu principal';
Escribir "1.Incializacion de datos";
escribir "2.Simulacion del flujo vehicular";
escribir "3.Verfical congestionamiento vial";
escribir "4.Salir";
Repetir
Escribir "Ingrese la opcion deseada";
leer Respuesta_menu;
Hasta Que Respuesta_menu=1 o Respuesta_menu=4
Segun Respuesta_menu Hacer
1:
escribir "Datos inicializados!";
Escribir "Cantidad de vehiculos por paeje y por dia";
Escribir "D L M K J V S Peaje/dia";
Dimension matriz[4,7], vector1[7], vector2[7];
definir mayor Como Entero
definir menor Como Entero
para f= 1 hasta 4 con paso 1 Hacer
para c = 1 hasta 7 con paso 1 Hacer
matriz(f,c) =azar(1);
FinPara
FinPara
para f= 1 hasta 4 con paso 1 Hacer
para c = 1 hasta 7 con paso 1 Hacer
escribir matriz(f,c), " " sin saltar;
FinPara
escribir 'Escazu ', (f);
FinPara
Escribir "presionar tecla';
Esperar Tecla;
Borrar Pantalla;
escribir "Datos inicializados!";
Escribir "Cantidad de vehiculos por paeje y por dia";
Escribir "D L M K J V S Peaje/dia";
Dimension matriz1[4,7], vector3[7], vector4[7];
para f= 1 hasta 4 con paso 1 Hacer
para c = 1 hasta 7 con paso 1 Hacer
matriz1(f,c) =azar(300) +1;
FinPara
FinPara
para f= 1 hasta 4 con paso 1 Hacer
para c = 1 hasta 7 con paso 1 Hacer
escribir matriz1(f,c), " " sin saltar;
vector3(f)=vector3(f)+matriz1(f,c);
FinPara
escribir 'Clase ', f;
FinPara
Escribir ' ';
escribir ' ';
Escribir 'GV Ruta 27, reporte Semanal';
Escribir '--------------------------------------------';
para f= 1 hasta 4 con paso 1 Hacer
si ([f]>mayor) Entonces
mayor=[f]
posicion1=f
FinSi
FinPara
para f= 1 hasta 4 con paso 1 Hacer
si ([f]<menor) Entonces
menor=[f]
posicion2=f
FinSi
FinPara
Escribir 'El paeje de mayor congestion es: ',posicion1 , ' con', mayor, ' vehiculos procesados';
Escribir 'El paeje de menor congestion es: ',posicion2 , ' con', menor, ' vehiculos procesados';
Escribir ' ';
FinSegun
FinAlgoritmo