Два массива размерностями 10 и 15 слить в один, расположив сначала элементы второго, затем первого. Массивы сгенерировать из отрезка (0; 100) — QBasic(Бейсик)

CLS
n = 10
m = 15
DIM a(n), b(m), c(n + m)
RANDOMIZE TIMER
FOR i = 1 TO n
    a(i) = FIX(RND * 99 + 1)
NEXT
FOR i = 1 TO m
    b(i) = FIX(RND * 99 + 1)
NEXT
FOR i = 1 TO m
    c(i) = b(i)
NEXT
FOR i = m + 1 TO n + m
    c(i) = a(i - m)
NEXT

PRINT "massiv 1"
FOR i = 1 TO n
    PRINT a(i);
NEXT
PRINT
PRINT "nassiv 2"
FOR i = 1 TO m
    PRINT b(i);
NEXT
PRINT
PRINT "massiv 3"
FOR i = 1 TO n + m
    PRINT c(i);
NEXT