Язык программирования - паскаль. Найти количество четных значений функции а=3b-1 при...

Question

Язык программирования - паскаль. Найти количество четных значений функции а=3b-1 при b=-10, -9, -8, …,10

Answer 1

// PascalABC.NET 3.3, сборка 1627 от 27.01.2018
// Внимание! Если программа не работает, обновите версию!

begin
  Range(-10,10).Where(t->(3*t-1).IsEven).Count.Println
end.

Результат
10

Comments

Несколько ответов надо, там же в промежутке от -10 до 10 включительно. И я забыл отметить, что программа нужна на турбо паскале

---

Читайте внимательно, там функция a=3b-1, и дальше по задаче надо найти количество четных значений функции при выше указанных значениях b