Найти максимальный элемент массива- QBasic(Бейсик)

CLS 
  N = 15 
  PRINT "Massiv: ";
  DIM M(N) 
  FOR I = 1 TO N 
  M(I) = INT(RND * 100) 
  PRINT M(I) ;
  NEXT I 
  MAX=M(1)
  FOR I = 2 TO N 
  IF MAX < M(I) THEN MAX=M(I)
  NEXT I 
  PRINT
  PRINT "_________" 
  PRINT "Maximum = "; MAX