Q Basic

[Dron247]

Помогите с задачей...
1)Сформировать матрицу А(10,10) случайными числами в диапазоне [-100,100]
2)вычислить производные элементов главной диагонали матрицы А
3)Вывести на печать элементы столбца матрицы, в которой расположено максимальное значение
4)Найти кол-во элементов матрицы А, удовлетворяющих условию
-100<=A(i,j)<=100
и образовать из этих элементов массив В
5)Отсортировать элементы каждой строки матрицы А по возрастанию
6)Вывести на печать массивы А,В и матрицу А после сортировки

Ничего полезного писать не буду. Спрошу лишь - Вы что, школьники/студенты начальных курсов совсем уже обленились, такие примитивные задачи, которые полюбой есть в методичке, которую полюбой вы должны взять в библиотеке, на форумы выкладывать? Скоро уже пойдут темы типа:" Я сижу в туалете, мне лень вытереть ж*пу, помогите!".

[mishutka]

пожалуйста помогите решить задачи !!

1)Ввести матрицу А размером 4х4
2)Найти S-сумму элементов, расположенных над главной диогональю матрицы А
3)Оброзовать одноменрый массив Y из элементовматрицы A , которые больше числа B
4) Упорядочить элементы каждого столбца матрицы А в порядке возрастания
5)Вывести на печать: исходящую матрицу А, S, массив Y, матрицу А после сортировки.

часть я уже сделал, а вот как дальше не знаю

CLS
REM 1
DIM A(4, 4)
FOR I = 1 TO 4
FOR J = 1 TO 4
A(I, J) = INT(RND * 100)
NEXT J
NEXT I
PRINT "MASSIV A"
FOR I = 1 TO 4
FOR J = 1 TO 4
PRINT A(I, J);
NEXT J
PRINT
NEXT I

[Dron247]

пожалуйста помогите решить задачи !!

1)Ввести матрицу А размером 4х4
2)Найти S-сумму элементов, расположенных над главной диогональю матрицы А
3)Оброзовать одноменрый массив Y из элементовматрицы A , которые больше числа B
4) Упорядочить элементы каждого столбца матрицы А в порядке возрастания
5)Вывести на печать: исходящую матрицу А, S, массив Y, матрицу А после сортировки.

часть я уже сделал, а вот как дальше не знаю

CLS
REM 1
DIM A(4, 4)
FOR I = 1 TO 4
FOR J = 1 TO 4
A(I, J) = INT(RND * 100)
NEXT J
NEXT I
PRINT "MASSIV A"
FOR I = 1 TO 4
FOR J = 1 TO 4
PRINT A(I, J);
NEXT J
PRINT
NEXT I

2)Также внутри вложенного цикла, только добавляется IF-THEN где в условии указывается что J > I насколько я помню - это достаточный признак положения над диагональю, и в результате выполнения этого условия должно выполниться S= S + A(I,J)

3) Создаешь одномерный массив А2 с числом элементов равным 16(4х4 ведь), 16 на случай если все больше В
тот-же самый вложенный цикл, только в условии сравнивай А(i,j) c B и если верно то А2(N) = A(I,J)

дальше лень пока, упорядочить столбец - то-же что и строки, токма индексы поменять местами, а строта упорядочивается как одномерник, а А2 - это походу и есть Y

[mishutka]

пожалуйста помогите решить задачи !!

1)Ввести матрицу А размером 4х4
2)Найти S-сумму элементов, расположенных над главной диогональю матрицы А
3)Оброзовать одноменрый массив Y из элементовматрицы A , которые больше числа B
4) Упорядочить элементы каждого столбца матрицы А в порядке возрастания
5)Вывести на печать: исходящую матрицу А, S, массив Y, матрицу А после сортировки.

часть я уже сделал, а вот как дальше не знаю

CLS
REM 1
DIM A(4, 4)
FOR I = 1 TO 4
FOR J = 1 TO 4
A(I, J) = INT(RND * 100)
NEXT J
NEXT I
PRINT "MASSIV A"
FOR I = 1 TO 4
FOR J = 1 TO 4
PRINT A(I, J);
NEXT J
PRINT
NEXT I

после продолжительной и бурной мозговой деятельности мой мозг выдал следующее

REM 2
S = 0 FOR I = 1 TO 4
FOR J = 1 TO 4
IF J>I THEN S = S + A(I, J)
NEXT J
NEXT I

наставьте на путь истины, как делать 3 пункт??