Найти максимальное значение массива - QBasic

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

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

Прошу помощи у великих программистов помочь мне написать программу по следующим задачам : 1. Дан одномерный массив чисел. Найти максимальное значение массива – mах и минимальное - min. Поменять местами max и min, если сумма первых 5-ти элементов больше суммы последних 5-ти элементов. 2.Дан двумерный массив целых чисел. Для каждой строки выяснить имеются ли в ней положительные элементы. Прошу прощения,если эти задачи кажутся слишком легкими...просто я учусь на технолога и совсем не знаю информатику.

Решение задачи: «Найти максимальное значение массива»

textual
Листинг программы
  1. FOR i = 1 TO n
  2. pol = 0
  3. FOR j = 1 TO m
  4. IF a(i, j) > 0 THEN pol = pol + 1
  5. NEXT j
  6. b(i) = pol
  7. NEXT i
  8. FOR i = 0 TO n
  9. IF b(i) <> 0 THEN
  10. PRINT "положительные элементы в"; i; "строке Есть"
  11. ELSE
  12. PRINT " положит элементов НЕТ"
  13. END IF
  14. NEXT i

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

В этом коде выполняются следующие действия:

  1. Задаются два массива: a(i, j) и b(i).
  2. Переменная pol инициализируется нулем.
  3. Происходит два вложенных цикла:
    • Первый цикл перебирает строки массива a(i, j).
    • Второй цикл перебирает столбцы массива a(i, j).
    • Если элемент массива a(i, j) больше нуля, то к переменной pol прибавляется единица.
  4. Значение переменной pol записывается в массив b(i).
  5. Происходит третий цикл, который перебирает строки массива b(i).
    • Если значение элемента массива b(i) не равно нулю, то выводится сообщение положительные элементы в i строке Есть, где i - номер строки.
    • Если значение элемента массива b(i) равно нулю, то выводится сообщение положит элементов НЕТ.

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


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

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

14   голосов , оценка 4.214 из 5

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

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

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