Algoritmos

ALGORITMO ejercicio 11

VARIABLE

ENTERO n[1..20];

ENTERO indice;

ENTERO factorial;

ENTERO indice1;

ENTERO N[1..20];

FIN_VARIABLE

INICIO

PARA indice = 1 HASTA 20 INCREMENTO 1

ESCRIBIR (“Introduce un numero”);

LEER (n[indice]);

FIN_PARA

PARA indice = 1 HASTA 20 INCREMENTO 1

Factorial = 1;

PARA indice1 = 2 HASTA n[indice] INCREMENTO 1

Factorial = factorial * indice1;

FIN_PARA

N[indice] = factorial;

FIN_PARA

FIN_INICIO

FIN_ALGORITMO

ALGORITMO ejercicio 13

VARIABLE

ENTERO A[1..5][1..10];

ENTERO B[1..5][1..10];

ENTERO suma[fila][columna];

ENTERO fila;

ENTERO columna;

FIN_VARIABLE

INICIO

PARA fila = 1 HASTA 5 INCREMENTO 1

PARA columna = 1 HASTA 10 INCREMENTO 1

LEER (A[fila][columna]);

FIN_PARA

FIN_PARA

PARA fila = 1 HASTA 5 INCREMENTO 1

PARA columna = 1 HASTA 10 INCREMENTO 1

LEER (B[fila][columna]);

FIN_PARA

FIN_PARA

PARA fila = 1 HASTA 5 INCREMENTO 1

PARA columna = 1 HASTA 10 INCREMENTO 1

Suma[fila][columna] = A[fila][columna] + B[fila][columna];

FIN_PARA

FIN_PARA

ESCRIBIR (suma[fila][columna]);

FIN_INICIO

FIN_ALGORITMO

ALGORITMO ejercicio 14

VARIABLE

ENTERO A[1..5][1..4];

ENTERO fila;

ENTERO columna;

ENTERO mayor;

ENTERO posicion_fila;

ENTERO posición_columna;

FIN_VARIABLE

INICIO

PARA fila = 1 HASTA 5 INCREMENTO 1

PARA columna = 1 HASTA 4 INCREMENTO 1

ESCRIBIR (“Introduce un numero”);

LEER (A[fila][columna]);

FIN_PARA

FIN_PARA

Mayor = A[1][1];

Posición_fila = 1;

Posición_columna = 1;

PARA fila = 1 HASTA 5 INCREMENTO 1

PARA columna = 1 HASTA 4 INCREMENTO 1

SI (A[fila][columna] > mayor) ENTONCES

Mayor = A[fila][columna];

Posición_fila = [fila];

Posición_columna = [columna];

FIN_SI

FIN_PARA

ESCRIBIR (“El mayor es:mayor”);

ESCRIBIR (“La posición es:posición_fila, Posición_columna”);

FIN_PARA

FIN_INICIO

FIN_ALGORITMO

ALGORITMO ejercicio 15

VARIABLE

ENTERO A[1..5][1..4];

ENTERO fila;

ENTERO columna;

ENTERO mayor;

ENTERO posicion_fila;

ENTERO posición_columna;

ENTERO menor

ENTERO posición_fila1;

ENTERO posición_columna1;

FIN_VARIABLE

INICIO

PARA fila = 1 HASTA 5 INCREMENTO 1

PARA columna = 1 HASTA 4 INCREMENTO 1

ESCRIBIR (“Introduce un numero”);

LEER (A[fila][columna]);

FIN_PARA

FIN_PARA

Mayor = A[1][1];

Posición_fila = 1;

Posición_columna = 1;

PARA fila = 1 HASTA 5 INCREMENTO 1

PARA columna = 1 HASTA 4 INCREMENTO 1

SI (A[fila][columna] > mayor) ENTONCES

Mayor = A[fila][columna];

Posición_fila = [fila];

Posición_columna = [columna];

FIN_SI

FIN_PARA

ESCRIBIR (“El mayor es:mayor”);

ESCRIBIR (“La posición es:posición_fila, Posición_columna”);

FIN_PARA

...