Usuario:Ricardocorrea~eswikibooks/programacion8

EJERCICIO 5.12 PAG 192

Nota:este ejercicio esta hecho con base en la logica de programacio de joyanes. _____________________________________________________________________

calcular el valor maximo de una serie de 100 numeros.

algoritmo maximo
var
 entero:n,numero,maximo
inicio
 leer(numero)
 n<-1
 maximo<-numero
 repetir
  n<-n+1
  leer(numero)
  si numero>maximo entonces
   maximo<-numero
  fin_si
 hasta_que n=100
 escribir(`numero mayor o maximo`,maximo)
fin