Advertisement
Guest User

Untitled

a guest
Mar 31st, 2020
92
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.24 KB | None | 0 0
  1. nmax=10
  2.  
  3. for i=1 to nmax
  4. numeri[i]=math.GetRandomNumber(100)
  5. endfor
  6.  
  7. for i=1 to (nmax-1) 'controllo fino al penultimo
  8. if numero[i]>numero[i+1] then
  9.  
  10. endif
  11. endfor
  12.  
  13. for i=1 to nmax
  14. TextWindow.writeline( numeri[i])
  15. endfor
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement