Напечатать таблицу умножения на 9. в басике.

For i = 1 To 9
  For j = 1 To 9
    s$=String(i*j)
    if length(s$)=1 then s$="  "+s$ else if length(s$)=2 then s$=" "+s$
    Print s$;
  Next j
  Print
Next i
End

Результат работы программы:
  1  2  3  4  5  6  7  8  9
  2  4  6  8 10 12 14 16 18
  3  6  9 12 15 18 21 24 27
  4  8 12 16 20 24 28 32 36
  5 10 15 20 25 30 35 40 45
  6 12 18 24 30 36 42 48 54
  7 14 21 28 35 42 49 56 63
  8 16 24 32 40 48 56 64 72
  9 18 27 36 45 54 63 72 81

Замечание: таблица на самом деле ровная, это тут ширина пробела и ширина цифры различна, поэтому сдвиг.