Cрочно! Язык visual basic,массивы - задачи:
1)Заменить значение любого элемента массива на а
2)Определить имеются ли четные числа в массиве
3)Заменить все элементы некоторой строки на заданное число
4)Вывести все элементы N столбца и M строки 

1)a=InputBox("Введите а")n=InputBox("Введите номер элемента")mas(N)=a2)s="No"For i=1 to n   If (mas(i) mod 2=0) then s="Yes"next iMsgBox(s)3)a=InputBox("Введите а")n=InputBox("Введите номер строки")For i=1 to n  mas(n,i)=anext i4)n=InputBox("Введите номер столбца")m=InputBox("Введите номер строки")for i=1 to k  s=s & mas(m,i) &" "  t=t & mas(i,n) & " "next iMsgBox(s)MsgBox(t)