Найти сумму элементов главной и второстепенной диагонали матрицы - QBasic

Узнай цену своей работы

Формулировка задачи:

1. Дан массив A(N, N), состоящий из случайных чисел от 1 до 9. Вывести сам массив, а также сумму элементов главной и второстепенной диагонали. 2. Дан массив A(N,N), состоящий из случайных чисел от 10 до 20. Вывести сам массив и среднее арифметическое элементов массива, находящихся в правом треугольнике. 3. Дан массив A(N,M), состоящий из случайных двухзначных чисел. Вывести сам массив и количество элементов, кратных 3., а также минимальный элемент массива. 4. Создать массив A(N,N)), состоящий из случайных чисел от 1 до 9. Вывести массив. Найти S=(X+Y)/10, где X - номер столбца, содержащего максимальный элемент массива, Y – сумма элементов второстепенной диагонали. 5. Дан массив A (6, 6), состоящий из случайных трехзначных чисел. Поменять местами максимальный и минимальный элемент массива. 6. Дан массив A(N, N), состоящий из случайных двухзначных чисел. Поменять в массиве первую строку со строкой, содержащей максимальный элемент. 7. Дан массив A(N, N), состоящий из случайных двухзначных чисел. Поменять в массиве последний столбец со столбцом, содержащим минимальный элемент. 8. Дана матрица A(N, N), состоящая из чисел от 10 до 50. Заменить все элементы нижнего треугольника нулями. Транспонировать матрицу. 9. Отсортировать строки массива A(N, M) из случайных чисел от 10 до 25 по убыванию элементов. 10. Отсортировать столбцы массива A(N, M) из случайных чисел от 10 до 50 по убыванию элементов.

Решение задачи: «Найти сумму элементов главной и второстепенной диагонали матрицы»

textual
Листинг программы
CLS : INPUT "Vvedite N: ", N
DIM A(N, N) AS INTEGER
 RANDOMIZE TIMER
 FOR iy = 1 TO N
    FOR ix = 1 TO N
    A(ix, iy) = RND * 8 + 1
    PRINT A(ix, iy);
    NEXT: PRINT
 NEXT
 FOR i = 1 TO N
   Sgl = Sgl + A(i, i)
   Svt = Svt + A(N - i + 1, i)
 NEXT
 PRINT "Summa glavnoj        :"; Sgl
 PRINT "Summa vtorostepennoj :"; Svt

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

13   голосов , оценка 3.769 из 5
Похожие ответы