Ввести матрицу В, m ≠n. Заменить в каждой строке максимальный элемент – нулем. Вывести исходную и преобра - QBasic

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

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

Ввести матрицу В(m,n), m ≠n. Заменить в каждой строке максимальный элемент – нулем. Вывести исходную и преобразованную матрицы.

Решение задачи: «Ввести матрицу В, m ≠n. Заменить в каждой строке максимальный элемент – нулем. Вывести исходную и преобра»

textual
Листинг программы
  1. CLS
  2. RANDOMIZE TIMER
  3. m = 6
  4. n = 8
  5.  
  6. DIM B(1 TO m, 1 TO n) AS INTEGER
  7.  
  8. FOR i = 1 TO m
  9. FOR j = 1 TO n
  10.    B(i, j) = 80 * RND - 40
  11.    PRINT USING "####"; B(i, j);
  12. NEXT j: PRINT
  13. NEXT i: PRINT
  14.  
  15. FOR i = 1 TO m
  16.    Max = B(i, 1)
  17.    jm = 1
  18.  
  19.    FOR j = 1 TO n
  20.       IF Max < B(i, j) THEN
  21.          Max = B(i, j)
  22.          jm = j
  23.       END IF
  24.    NEXT j
  25.    B(i, jm) = 0
  26. NEXT i
  27.  
  28. FOR i = 1 TO m
  29. FOR j = 1 TO n
  30.    PRINT USING "####"; B(i, j);
  31. NEXT j: PRINT
  32. NEXT i
  33.  
  34. END

Объяснение кода листинга программы

  1. Задаются значения переменных m и n (первая строка).
  2. Создается матрица B (16 строк).
  3. В каждой строке матрицы B случайным образом заполняются элементы (17-20 строки).
  4. Выводятся на экран все элементы матрицы B (21-22 строки).
  5. В каждой строке матрицы B находится максимальный элемент (23-26 строки).
  6. Ноль заменяется на максимальный элемент в каждой строке (27-28 строки).
  7. Выводятся на экран все элементы матрицы B после замены (29-30 строки).

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


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

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

12   голосов , оценка 3.5 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Бесплатно
Оформите заказ и авторы начнут откликаться уже через 10 минут
Похожие ответы