zadach336.BAS

{* Задача336 *}

REM basic

' Для заданной целочисленной матрицы А(N,М) определите, является ли сумма ее элементов четным числом, и выведите на печать соответствующий текст.


For i = 1 To n
  For j = 1 To m
  s = s + a(i, j)
  Next i
Next j
If s Mod 2 = 1 Then
  PRINT "ne chetnoe"
Else
  PRINT "chetnoe"
End If
End