Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 24.12.2008, 10:20   #1
_леся_
 
Регистрация: 24.12.2008
Сообщений: 3
По умолчанию Visual Basic

Скажите, а как распечатать одномерный массив, чтобы он был не в одну строку, а в несколько??
_леся_ вне форума Ответить с цитированием
Старый 24.12.2008, 14:32   #2
ViNcHeStEr
Delphi
Форумчанин
 
Регистрация: 12.06.2008
Сообщений: 137
По умолчанию

Как я понял надо массив распечатать как столбец.

Private Sub Command1_Click()
Dim mas(1 To 4) As Integer
Cls
Randomize
For i = 1 To 4
mas(i) = Fix(Rnd(1) * 100) + 1
Print mas(i) 'если после mas(i) поставить ";", то будет в строчку, а так в столбец
Next i
End Sub

Последний раз редактировалось ViNcHeStEr; 24.12.2008 в 14:34.
ViNcHeStEr вне форума Ответить с цитированием
Старый 24.12.2008, 19:37   #3
_леся_
 
Регистрация: 24.12.2008
Сообщений: 3
По умолчанию

Мне надо, чтобы массив на сто элементов был бы полностью виден на экране. то есть, например, по 15 элементов в строке.
_леся_ вне форума Ответить с цитированием
Старый 24.12.2008, 21:16   #4
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,229
По умолчанию

Код:
for i:=1 to 100 do begin
  Write(A[i]:4);
  if (i mod 15) = 0 then WriteLn;
end;
WriteLn;
Serge_Bliznykov вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Компонент Visual Basic sqvair Помощь студентам 8 06.10.2007 17:24