10 DIM arr(10)20 FOR i = 1 TO 1030 arr(i) = 240 NEXT i50 FOR i = 1 TO 1060 PRINT "Элемент " + LTRIM$(STR$(i)) + " массива равен " + LTRIM$(STR$(arr(i)))70 NEXT i80 END
10 DIM arr(10)
20 FOR i = 1 TO 10
30 arr(i) = 2
40 NEXT i
50 FOR i = 1 TO 10
60 PRINT "Элемент " + LTRIM$(STR$(i)) + " массива равен " + LTRIM$(STR$(arr(i)))
70 NEXT i
80 END