📅  最后修改于: 2022-03-11 14:49:23.236000             🧑  作者: Mango
Algoritmo para_arreglo_unidimensional
// Tamaño máximo del arreglo
Dimension a(100);
// Definiendo el tipo de datos de las variables a utilizar
Definir a,n,i,s,mayor,pos Como Entero;
// Tamaño del arreglo a trabajar
Repetir
Escribir "Ingrese el valor de n: " Sin Saltar;
Leer n;
Hasta Que n>=0 Y n<100;
// Ingreso de los elementos al arreglo
Para i<-0 Hasta n-1 Con Paso 1 Hacer
Escribir "A[",i,"]= " Sin Saltar;
Leer a[i];
FinPara
// Mostrar los elementos ingresados en pantalla
Escribir "ANTES: ";
Para i<-0 Hasta n-1 Con Paso 1 Hacer
Escribir "A[",i,"]= ", a[i];
FinPara
s <- 0;
Para i<-0 Hasta n-1 Con Paso 1 Hacer
s <- s + a[i];
FinPara
mayor <- -10000;
Para i<-0 Hasta n-1 Con Paso 1 Hacer
Si mayor