Есть ответ 👍

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

280
355
Посмотреть ответы 2

Ответы на вопрос:


1) a=inputbox("введите а") n=inputbox("введите номер элемента") mas(n)=a 2) s="no" for i=1 to n     if (mas(i) mod 2=0) then  s="yes" next i msgbox(s) 3) a=inputbox("введите а") n=inputbox("введите номер строки") for i=1 to n   mas(n,i)=a next i 4) n=inputbox("введите номер столбца") m=inputbox("введите номер строки") for i=1 to k   s=s & mas(m,i) & " "     t=t & mas(i,n) & " " next i msgbox(s) msgbox(t)
Mila1515
4,8(67 оценок)

Pascal: var a, b, c, d: integer; begin read(a); read(b); read(c); d: =0; d: =c; c: =a; a: =d; writeln(a, '  ',b, '  ',c); end.

Популярно: Информатика