Вычислить количество нулевых элементов массива - QBasic
Формулировка задачи:
Здравствуйте! помогите пожалуйста проверить код и блок схему.
Дан массив А(10). Вычислить количество нулевых элементов, сумму положительных элементов и среднее значение отрицательных элементов массива
Листинг программы
- DIM a(10)
- DATA 0,1,2,3,4,5,6,7,8,9
- PRINT "Мой Массив"
- FOR i=1 TO 10
- READ a(i)
- PRINT a(i)
- NEXT i
- Knul=0, sum=0, Kotr=0, sumotr=0
- Fori=1 TO 10
- IF a(i)=0 THEN
- Knull=Knull+1
- END IF
- IF a(i)>0 THEN
- sum=sum+a(i)
- END IF
- IF a(i)<0 THEN
- sumotr=sumotr+a(i)
- Kotr=Kotr+1
- END IF
- NEXT i
- sr = sumotr/Kotr
- PRINT Knull
- PRINT sum
- PRINT sr
- END
Решение задачи: «Вычислить количество нулевых элементов массива»
textual
Листинг программы
- DIM a(10)
- DATA 0,1,2,3,4,5,6,7,8,9
- PRINT "Мой Массив"
- FOR i=1 TO 10
- READ a(i)
- PRINT a(i)
- NEXT i
- Knul=0, sum=0, Kotr=0, sumotr=0
- FOR i=1 TO 10
- IF a(i)=0 THEN
- Knull=Knull+1
- END IF
- IF a(i)>0 THEN
- sum=sum+a(i)
- END IF
- IF a(i)<0 THEN
- sumotr=sumotr+a(i)
- Kotr=Kotr+1
- END IF
- NEXT i
- sr = sumotr/Kotr
- PRINT Knull
- PRINT sum
- PRINT sr
- END
Объяснение кода листинга программы
В этом коде:
- Создается массив a(10) и заполняется данными с помощью команды DATA.
- Выполняется цикл FOR, который проходит по всем элементам массива a(10).
- В каждой итерации цикла, с помощью команды READ, вводится значение текущего элемента массива.
- Затем значение текущего элемента массива выводится на экран с помощью команды PRINT.
- После выполнения цикла, выводится символ новой строки с помощью команды PRINT.
- Создаются четыре переменные: Knul, sum, Kotr и sumotr. Значения этих переменных инициализируются нулем.
- Выполняется второй цикл FOR, который также проходит по всем элементам массива a(10).
- Внутри цикла проверяется значение текущего элемента массива.
- Если элемент равен нулю, то к переменной Knul прибавляется единица.
- Если элемент больше нуля, то к переменной sum прибавляется значение текущего элемента массива.
- Если элемент меньше нуля, то к переменной sumotr прибавляется значение текущего элемента массива, а к переменной Kotr прибавляется единица.
- После выполнения второго цикла, вычисляется среднее значение отрицательных элементов массива с помощью формулы sr = sumotr/Kotr.
- Затем выводятся значения переменных Knul, sum и sr.
- Код завершается командой END.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д