Pasar Ejercios de Pseint A Java
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<a[i] Entonces
mayor <- a[i];
pos <- i;
FinSi
FinPara
a[pos] <- s;
Escribir "DESPUES: ";
// Mostrar los elementos ingresados en pantalla
Para i<-0 Hasta n-1 Con Paso 1 Hacer
Escribir "A[",i,"]= ", a[i];
FinPara
FinAlgoritmo
Helpful Hawk
