[Массивы] Ввод данных в массив через Inputbox

#include<Array.au3>
$Str=InputBox("Габориты", "Укажите количество окон", "", "")
$aStr = StringSplit($Str, "")
For $i = 0 To $Str
   $aStr[$i]=InputBox("Габориты", "ширина " & $i & " окна", "", "")
Next
MsgBox(16, "Данные","ширина " & $i & " окна" &$aStr[$i] ,1)

#include <Array.au3>
$iCount = InputBox('Габариты','Укажите количество окон')
If @error Then Exit MsgBox(0,'Отменили','Пока')
If Not StringIsDigit($iCount) Then Exit MsgBox(0,'Отменили','Нужно было ввести число')
If $iCount=0 Then Exit MsgBox(0,'Отменили','Ноль окон')
Global $aData[$iCount + 1]
$aData[0] = 'Ширина окон'
For $i = 1 To $iCount
	$aData[$i] = InputBox('Габариты','Ширина '& $i & ' окна')
Next
_ArrayDisplay($aData)

#include<Array.au3>
$sWin=InputBox("Габариты","Просьба указать количество окон")
Global $aWin[$sWin][2]
For $i=0 To UBound($aWin)-1
	$aWin[$i][1]=InputBox("Габариты","Укажите ширину "&$i&" окна(Перечисление начинается от нуля)")
	$aWin[$i][0]=$i
Next
;~ _ArrayDisplay($aWin)
_ArrayDisplay($aWin,"Габариты",-1,0,'',"|","Номер индекса в массиве|Номер окна|Ширина окна")

#include<Array.au3>
$Str=InputBox("Габариты", "Укажите количество окон", "", "")
	If @Error OR $Str < 1 Then
	MsgBox(16,"Габариты","Количество не задано")
	Exit
	EndIF

Local $aArray[1] = [$Str];		$aArray[0] будет содержать кол-во окон (из строки №2)


For $i = 1 To $Str
   Local $X = InputBox("Габариты", "Ширина " & $i & " окна", "", "")
   _ArrayAdd ( $aArray, $X )
Next

_ArrayDisplay ( $aArray, "Результаты" );	Просмотр результата