Cрочно! язык visual basic,массивы - : 1)заменить значение любого элемента массива на а 2)определить имеются ли четные числа в массиве 3)заменить все элементы некоторой строки на заданное число 4)вывести все элементы n столбца и m строки
280
355
Ответы на вопрос:
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)
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.
Популярно: Информатика
-
72847013.03.2020 20:53
-
vlada05119904.07.2020 00:06
-
Anechka666501.11.2021 03:19
-
Eva2709200611.11.2022 02:13
-
anait8705.01.2023 21:16
-
ShkolnikN1509.11.2021 04:09
-
melisa200715.05.2020 15:14
-
DaveDead19.07.2022 06:50
-
Arina2008egor15.04.2021 08:35
-
Александр73124.05.2022 11:29