Найти максимальный элемент матрицы - QBasic (27607)

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

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

Задание № 1. Дана матрица целых чисел размером nхm. Найти максимальный элемент матрицы, начиная со следующего, все элементы матрицы увеличить на величину найденного элемента. Задание № 2. Дана матрица целых чисел размером nхm. Вычесть поэлементно из каждого столбца, кроме i-го, i-й столбец.

Решение задачи: «Найти максимальный элемент матрицы»

textual
Листинг программы
  1. DEFINT A, I-K, M-N, S
  2. OPTION BASE 1
  3. RANDOMIZE TIMER
  4. CLS
  5. INPUT "Vvedite N"; n
  6. INPUT "Vvedite M"; m
  7. DO
  8.    INPUT "Vvedite Nomer stolbca (<=M)"; k
  9. LOOP WHILE k > m
  10. DIM a(n, m)
  11.  
  12. FOR i = 1 TO n
  13.    FOR j = 1 TO m
  14.       a(i, j) = 21 * RND - 10.5
  15.       PRINT USING "####"; a(i, j);
  16.    NEXT j
  17.    PRINT
  18. NEXT i
  19.  
  20. PRINT
  21. FOR j = 1 TO m
  22.    IF j = k THEN 2014
  23.    FOR i = 1 TO n
  24.       a(i, j) = a(i, j) - a(i, k)
  25.    NEXT i
  26. 2014
  27. NEXT j
  28.  
  29. PRINT
  30. FOR i = 1 TO n
  31.    FOR j = 1 TO m
  32.       PRINT USING "####"; a(i, j);
  33.    NEXT j
  34.    PRINT
  35. NEXT i
  36. END

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


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

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

13   голосов , оценка 4.308 из 5

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

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

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