Написать программу Q Basic
Даны 2 одномерный числовых массива размерностью N . Создать третий массив , элементы которого равны сумме элементов двух других . Найти наименьший элемент массива

CLS


RESTORE


N = 14


DIM M1(14), M2(14), M12(14)


DATA 2,3,4,5,6,3,4,-8,7,3,-44,55,2,3


DATA 12,43,4,45,6,23,4,8,7,3,4,-5,2,53


FOR i = 1 TO N


READ M1(i)


PRINT M1(i),


NEXT i


PRINT
"-----------------------------------------------------------"


FOR i
= 1 TO N


READ
M2(i)


PRINT
M2(i),


NEXT i


PRINT"======================================================"


k = 1


mim =
M1(k) + M2(k)


FOR i
= 1 TO N


M12(i)
= M1(i) + M2(i)


PRINT
M12(i),


IF
M12(i) < min THEN


min =
M12(i)


k = i


END IF


NEXT i


PRINT"======================================================="

PRINT
"N="; k, min