Russian English
   Basic.net
Среда, 23.09.2020, 03:21
Меню сайта
Категории раздела
Basic [44]
Помощь [0]
Облако тегов
Статистика

Онлайн всего: 1
Гостей: 1
Пользователей: 0

Форма входа
Главная » Статьи » Basic

Как заполнить массив и вывести его на экран в QBasic
Share |
Начнем с того, что массив надо объявить. Если размеры массива заданы, например а(20) или a(5,6), первой командой программы пишем объявление массива. Легче всего это сделать просто добавив впереди слово DIM. Для первого примера
Код Basic4GL
1
DIM a(20)
для второго
Код Basic4GL
1
DIM a(5,6)
Если размеры массива в условии не заданы, вводим их с клавиатуры, а потом уже объявляем.
Для одномерного массива:
Код Basic4GL
1
2
INPUT "vvedite kolichestvo elementov N ",n
DIM a(n)
Для двумерного:
Код Basic4GL
1
2
3
INPUT"vvedite kolichestvo strok M ",m
INPUT"vvedite kolichestvo stolbcov N ",n
DIM a(m,n)
Теперь, когда массив объявлен, надо его заполнить.
Есть 3 основных варианта заполнения массива:
1. Ручной ввод с клавиатуры
2. Чтение данных из списка
3. Заполнение случайными числами
Есть и другие способы, но они применяются редко, и мы о них пока не будем говорить.
Разберём самый популярный способ
Ручной ввод.
Для одномерного массива мы пишем команду цикла FOR и в цикле заполняем массив командой INPUT
Для нашего примера это будет выглядеть так:
Код Basic4GL
1
2
3
FOR i=1 to N
input "vvedite element ",a(i)
next
или, если количество элементов известно, скажем, 20, то
Код Basic4GL
1
2
3
FOR i=1 to 20
input "vvedite element ",a(i)
next
Для двумерного массива циклов FOR будет 2 - для строк и для столбцов, поэтому заполнение будет выглядеть так:
Код Basic4GL
1
2
3
4
5
FOR i=1 to m
FOR j=1 to n
input "vvedite element ",a(i,j)
next
next
Массив заполнен. Выводим его на экран теми же командами цикла
Одномерный:
Код Basic4GL
1
2
3
FOR i=1 to N
print a(i);
next
Двумерный:
Код Basic4GL
1
2
3
4
5
6
FOR i=1 to m
FOR j=1 to n
print a(i,j);
next
print
next
Команда PRINT во второй раз пишется для перехода на следующую строку.

Итак, мы объявили, заполнили и вывели массив. С этого начинаются все программы на массивы.
Соберём всё в одну программу.
Программа заполнения и вывода одномерного массива:
Код Basic4GL
1
2
3
4
5
6
7
8
9
INPUT "vvedite kolichestvo elementov N ",n
DIM a(n)
FOR i=1 to N
input "vvedite element ",a(i)
next
print "massiv"
FOR i=1 to N
print a(i);
next
Программа заполнения и вывода двумерного массива:
Код Basic4GL
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
INPUT"vvedite kolichestvo strok M ",m
INPUT"vvedite kolichestvo stolbcov N ",n
DIM a(m,n)
FOR i=1 to m
FOR j=1 to n
input "vvedite element ",a(i,j)
next
next
print "matrica "
FOR i=1 to m
FOR j=1 to n
print a(i,j);
next
print
next
Если вы запомните, как это делается, считайте, что половину задачи вы уже решили. А это уже много.

Источник статьи: http://www.cyberforum.ru/post687912.html
Категория: Basic | Добавил: Admin (14.12.2012)
Просмотров: 9510 | Теги: статьи qbasic | Рейтинг: 0.0/0
Всего комментариев: 0
Добавлять комментарии могут только зарегистрированные пользователи.
[ Регистрация | Вход ]
Поиск
Наш опрос
Какую версию Basic вы предпочитаете?
Всего ответов: 2028

© Basic.ucoz.net, 2020