Найти количество двузначных чисел оканчивающихся ** 7. Составить программу в Pascal.

Question

Найти количество двузначных чисел оканчивающихся на 7. Составить программу в Pascal.

Answer 1

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

begin
  Range(17,99,10).Count.Println
end.

Результат
9

Answer 2

Var count, i: integer;
begin
  count := 0;
  for i := 10 to 99 do
    if i mod 10 = 7 then
      count := count + 1;
  writeln(count);
end.