Дан фрагмент программы на языке паскаль for n: =1 to 3 do for m: =1 to 3 do b[n,m]: =n*m; s: =0; for n: =1 to 3 do for m: =1 to 3 do if b[n,m]mod 2=0 then s: =s+1; чему будет равно значение s? необходимо составить программу.