Ответы на вопрос:
Int a: array[1..4, 1..4] of integer; i, j, k: integer; begin k: =0; for i: =1 to 4 do for j: =1 to 4 do begin readln(a[i, j]); if (i=j) and (a[i] < 0) and (a[i] mod 2 = 0) then k: = k+1; end; writeln(k); end.
Популярно: Информатика
-
фывапрпиол09.07.2021 20:26
-
данил193128.02.2021 18:10
-
Gggggggggggg2220.11.2022 02:45
-
Avenrop23613.06.2023 05:50
-
teodormax11.12.2020 22:29
-
Полюшенцыя30.11.2020 07:17
-
Furum28.12.2021 01:50
-
викусик15002.06.2021 17:24
-
St1ler15.09.2022 14:03
-
Fae4218.04.2021 18:49