Посчитать среднее арифметическое содержащихся в операторе DATA чисел - QBasic
Формулировка задачи:
Посчитать среднее арифметическое содержащихся в операторе DATA чисел.
Буду очень благодарен.
Решение задачи: «Посчитать среднее арифметическое содержащихся в операторе DATA чисел»
textual
Листинг программы
- DATA 1, 2, 4, 6, 2, 1 'грубо говоря, блок data-операторов
- DATA "end"
- ON ERROR GOTO finish
- DO: READ x: s=s+x: i=i+1: LOOP
- finish:
- PRINT s/i
- END
Объяснение кода листинга программы
В этом коде:
- Создаётся переменная
sи инициализируется нулём. - Создаётся переменная
iи инициализируется нулём. - Устанавливается условие цикла DO-LOOP.
- В цикле считывается каждое число из оператора DATA и прибавляется к переменной
s, а затем значение переменнойiувеличивается на единицу. - После окончания цикла вычисляется среднее арифметическое (переменная
sделится на переменнуюi). - Результат выводится на экран.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д
