Задача 2. Заполнить одномерный массив случайными числами от 0 до 100 и распечатать его.
Решение на Бейсик:
IINPUT i, DIM a(5)
FOR i=1 to 5
a(i) = INT(RND*100)
PRINT a(i);
NEXT iПрограммный код:
PUBLIC SUB Button1_Click()
DIM i AS Integer
DIM a AS NEW Integer[5]
RANDOMIZE
FOR i = 0 TO 5 - 1
a[i] = Rnd(0, 100)
PRINT a[i]; " ";
NEXT
ENDПо команде PRINT информация выводится на Консоль. В Visual Basic эта команда выводила информацию на форму. В практикуме Н.Д. Угриновича рассмотрен вывод массива в текстовое поле. В Gambas не получилось вывести массив в текстовое поле.
Если не добавить пробел в команде PRINT, то числа печатаются слитно.
Сайт управляется системой uCoz
