VBS/WSH/JS

lxa85 · Отправлено: **00:12, 16-05-2009** | #2

Цитата Triz:

If t Mod 6 = 0 Then Print
Print A(t)
Else: Print A(t) »

Двойной принт - это правильно?

Цитата Triz:

Dim t(1 To 40) As Integer
A(t) = Rnd »

И массив помему неверно объявлен. В QBasic программировал давно, но помоему должно выглядеть так:
Dim A(40) as Integer

Цитата Triz:

A(t) = Rnd »

Может можно одной строкой обойтись, может нет, трассировщик вам в помощь.
Цикл For должен закрываться конструктивой Next. (Если речь о VB)

Цитата Triz:

немогу найти ошибку как никак »

Трассировщик, трассировщик и еще раз трассировщик. И все будет отлично

Triz · Отправлено: **05:01, 16-05-2009** | #3

Цитата lxa85:

Двойной принт - это правильно? »

таким образом я хотел сделать так чтобы он вывел пустую строку.

pva · Отправлено: **06:58, 18-05-2009** | #4

1. else и двоеточие после else - так по синтаксису надо? ещё нехватает next t
2. 40 на 6 не делится, поэтому после последней строки перевода выведено не будет
3. при любом значении t выполняется Print A(t), зачем тогда загонять его в if?

Код:

If t Mod 6 = 0 Then Print
EndIf
Print A(t)

4. мне кажется через двойной цикл было бы правильней сделать

Код:

for t=0 to 40 step 6
  for i=t to min(40, t+6)
     Print A(i)
  next i
  Print
next t