monteno

menoman

Mar 10th, 2011
174
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. DIM i, n, menor, mayor, num AS INTEGER
  2. PRINT "Cuanto numeros va a a evaluar"
  3. I
  4. NPUT n
  5. mayor = 0
  6. menor = 999999
  7. FOR i = 1 TO n
  8.     PRINT "Escriba numero"
  9.     INPUT num
  10.     IF num > mayor THEN
  11.         mayor = num
  12.     END IF
  13.     IF num < menor THEN
  14.         menor = num
  15.     END IF
  16. NEXT
  17. PRINT "mayor", mayor
  18. PRINT "menor", menor
Advertisement
Add Comment
Please, Sign In to add comment