Сформируйте массив, содержащий 15 элементов, с помощью датчика случайных чисел - QBasic
Формулировка задачи:
Сформируйте массив, содержащий 15 элементов, с помощью датчика случайных чисел. Получите новый массив, элементы которого равны разности между максимальным и соответствующим элементом исходного массива. В полученном массиве найдите сумму элементов, которые меньше среднего арифметического значения элементов исходного массива. Выведите на экран исходные и полученные результаты.
Решение задачи: «Сформируйте массив, содержащий 15 элементов, с помощью датчика случайных чисел»
textual
Листинг программы
- RANDOMIZE TIMER
- n = 15
- DIM a(n), b(n)
- FOR i = 1 TO n
- a(i) = INT(RND * 51)
- NEXT
- max = a(1)
- FOR i = 2 TO n
- IF a(i) > max THEN max = a(i)
- NEXT
- FOR i = 1 TO n
- b(i) = max - a(i)
- NEXT
- FOR i = 1 TO n
- s = s + a(i)
- NEXT
- s = s / n
- FOR i = 1 TO n
- IF b(i) < s THEN sum = sum + b(i)
- NEXT
- FOR i = 1 TO n
- PRINT a(i);
- NEXT
- PRINT "max ="; max
- FOR i = 1 TO n
- PRINT b(i);
- NEXT
- PRINT "sr= ="; s
- PRINT "sum ="; sum
Объяснение кода листинга программы
- С помощью функции RANDOMIZE TIMER инициализируется генератор случайных чисел.
- Задается размер массива a(n) равный 15.
- Циклом FOR формируется массив a(n) из 15 случайно сгенерированных чисел в диапазоне от 0 до 50.
- Находится максимальное значение в массиве a(n).
- Циклом FOR проверяется каждый элемент массива a(n) на предмет превышения максимального значения, и если это так, то значение max обновляется.
- Циклом FOR формируется массив b(n) путем вычитания каждого элемента массива a(n) из максимального значения max.
- Циклом FOR происходит суммирование всех элементов массива a(n).
- Вычисляется среднее значение s путем деления суммы элементов массива a(n) на их количество.
- Циклом FOR проверяется каждый элемент массива b(n) на предмет того, является ли он меньше значения s, и если это так, то значение sum обновляется.
- Циклом FOR выводятся все элементы массива a(n).
- Выводится значение max.
- Циклом FOR выводятся все элементы массива b(n).
- Выводится значение s.
- Выводится значение sum.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д
