Заполнить массив - QBasic

Составьте программу заполнения массива из 100 чисел случайными значениями из диапазона от -20 до 20.

Листинг программы

RANDOMIZE TIMER
DIM a(99)
FOR i=0 TO 99
a(i)=INT(RND*41-20)
NEXT

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

RANDOMIZE TIMER - функция, которая инициализирует генератор случайных чисел
DIM a(99) - создание массива a размером 99 ячеек
FOR i=0 TO 99 - цикл, который проходит по всем ячейкам массива a от 0 до 99
a(i)=INT(RND*41-20) - заполнение каждой ячейки массива a случайным числом от 0 до 40
NEXT - переход к следующей итерации цикла
Код не содержит операций с переменными или выводов на экран, поэтому здесь он заканчивается