Переведите число 222 из десятичной системы счисления в двоичную систему счисления. сколько единиц содержит полученное число? в ответе укажите одно число – количество единиц.

222₁₀ = 11011110₂

ответ: 6

222 / 2 = 111 (0)

111 / 2 = 55 (1)

55 / 2 = 27 (1)

27 / 2 = 13 (1)

13 / 2 = 6 (1)

6 / 2 = 3 (0)

3 / 2 = 1 (1)

1 / 2 = 0 (1)

Четное число делится на два, а кратное пяти делится на пять, поэтому число должно делиться без остатка на 2х5=10

// PascalABC.NET 3.0,сборка 1076
begin
  var n:=ReadInteger('Длина последовательности: ');
  var a:=ArrRandom(n,-50,50);
  Writeln('Исходная последовательность');
  a.Println;
  Writeln('Сумма элементов: ',a.Sum);
  Write('Кол-во четных, кратных пяти: ');
  Writeln(a.Where(x-> x mod 10 = 0).Count)
end.

Тестовое решение:
Длина последовательности: 20
Исходная последовательность
-4 21 -21 -23 14 -39 -12 1 -7 4 17 -45 30 -48 -19 -12 27 -46 -37 15
Сумма элементов: -184
Кол-во четных, кратных пяти: 1

1цикл с постусловием цикл с постусловием — цикл, в котором условие проверяется после выполнения тела цикла. отсюда следует, что тело всегда выполняется хотя бы один раз. в языке паскаль этот цикл реализует оператор repeat..until; в си — do…while. pascal: repeat         < тело  цикла> until < условие> си: do {         < тело цикла> } while(< условие> ) в трактовке условия цикла с постусловием в разных языках есть различия. в паскале и языках, произошедших от него, условие такого цикла трактуется как условие выхода (цикл завершается, когда условие истинно, в терминологии такие циклы называют ещё «цикл до»), а в си и его потомках — как условие продолжения (цикл завершается, когда условие ложно, такие циклы иногда называют «цикл пока»)…                           2цикл с постусловием  — цикл, в котором условие проверяется  после  выполнения тела цикла. отсюда следует, что тело  всегда выполняется  хотя бы один раз. в языке паскаль этот цикл реализует  операторrepeat..until; в си  —  do…while.

на языке pascal цикл с постусловием имеет следующий вид: :

repeat < тело цикла> until < условие выхода>

на языке си:

do { < тело цикла> } while (< условие продолжения цикла> )

в трактовке условия цикла с постусловием в разных языках есть различия. в паскале и языках, произошедших от него, условие такого цикла трактуется как  условие выхода  (цикл завершается, когда условие истинно, в терминологии такие циклы называют ещё «цикл до»), а в си и его потомках  — как  условие продолжения  (цикл завершается, когда условие ложно, такие циклы иногда называют «цикл пока»).