Задана матрица а, состоящая из Н сстрок и М столбцов. определить количество нулевых элементов в четных столбцах
Задана матрица а, состоящая из Н сстрок и М столбцов. определить количество нулевых элементов в четных столбцах
Гость
Ответ(ы) на вопрос:
ГостьПрограмма Dim S As Integer, i As Long, j As Long, M As Long, N As Long, A(32767, 32767) As Integer N = InputBox ("Введите количество строк", a) M = InputBox ("Введите количество столбцов", a) S = 0 For i = 1 To M For j = 1 To N A(j, i) = InputBox ("Введите очередной элемент матрицы", a) If (i Mod 2 = 0) AND (A(j, i) = 0) Then S = S + 1 Next j Next i MsgBox (S) End
Гость….. var ar:array[1..H.,1..M] of integer; i,j,k:integer; ….. k:=0; for i:=0 to H do for j:=0 to M do if (not odd(j)) and (ar[ i, j ]=0) then inc(k); writeln(k); ….. end.
Гостьвам программу надо написать? если да, то на каком языке? формулируйте вопрос правильно и задайте в категории компьютеры, интернет - программирование
Не нашли ответ?
Похожие вопросы