Question

Найти количество натуральных чисел не превосходящих 100 и кратных 5

Answer 1

//PascalABC.NET (версия 3.1, сборка 1198 от 11.03.2016)
begin
  var n:=0;
  for var i:=1 to 100 do
    if i mod 5=0 then n:=n+1;
  println('Кратных 5 и меньше 100 всего ',n);
end.

Answer 2

Натуральные числа, которые не превышают 100 и кратны 5, образуют арифметическую прогрессию с начальным членом 5 и шагом 5. Чтобы найти количество таких чисел, нужно разделить 100 на 5 и добавить 1, так как включается также само число 100.

100 / 5 = 20 20 + 1 = 21

Таким образом, количество натуральных чисел, не превосходящих 100 и кратных 5, равно 21.