Найдите количество четных чисел в массиве целых чисел.Написать программу в Паскале

Question

Найдите количество четных чисел в массиве целых чисел.Написать программу в Паскале

Comments

ааа, это другая задача, щас, минуту

---

var a: array[1..10] of integer; i, Count: integer;begin for i := 1 to 10 do begin a[i] := i; Write(a[i], ' ') end; Writeln; for i := 1 to 10 do if a[i] mod 2 = 0 then begin Count := Count + 1; Write(a[i], ' '); end; Writeln; Write(Count); Readln;end.

---

что такое br?

---

count?

---

Да где ты тут видишь br? Count это количество четных.

---

var....

---

var - это ключевое слово в Паскале, для описания переменных оно нужно

---

да,хорошо

---

я другое имелс ввиду

---

но спасибо

Answer 1

Смотри сюда, нет тут никаких br. В окне вывода внизу первая строка это начальный массив, вторая строка - это четные в массиве, третья строка - количество четных

---