задача с массивами в Q basic

Question

задача с массивами в Q basic

полина сидоренко Знаток (302), на голосовании 13 лет назад

аполнить квадратный массив случайными числами от 0 до 19.количество элементов в массиве-25.найти максимальное значение среди элементов массива и вывести на экран.

Дополнен 13 лет назад

ну пожалуйста, напишите решение, я на уроке: )
пожаааааааааааалуйста!!!!

Answer 1

CLS
DIM a(5, 5)

FOR i = 1 TO 5
FOR j = 1 TO 5
a(i, j) = INT(20 * RND)
NEXT j
NEXT i

REM Find Maximum number

m = 0
FOR i = 1 TO 5
FOR j = 1 TO 5
IF m < a(i, j) THEN
m = a(i, j)
x = j: y = i
END IF
NEXT j
NEXT i

REM Output Max number
PRINT "Max number = "; m; " in array a("; y; ","; x; ")"