profile
Опубликовано 5 лет назад по предмету Информатика от mariia66

Сколько единиц в двоичной записи числа 41024 + 22046 – 15?

  1. Ответ
    Ответ дан iolandavalerypad353
    begin
        var L := new List<integer>;
        var num := 41024 + 22046 - 15;
        var i := 65536;
        while i >= 1 do begin
            if (num and i) <> 0 then L.Add(1)
            else if (num and i) = 0 then L.Add(0);
            i := Trunc(i / 2);
        end;
        L.Println; // 0 1 1 1 1 0 1 1 0 0 1 0 0 1 1 1 1
        L.Where(t -> t = 1).Count.Println; // 11
    end.
Самые новые вопросы