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

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.

1-Индексом элемента называется номер элемента в массиве  

 

2-Массив данных имеет общее имя и один тип

3-Массив-это совокупность однотипных данных, хранящихся в последовательных ячейках памяти  

4-В записи D[4]=3.5, D обозначает имя массива  

5-можно назвать этот ряд:2.3, 5.7, 10.89.

 6-правильно описание массива:D: array[1..5] of real

7-команда Randomize

 8-Для заполнения массива путем ввода чисел с клавиатуры мы используем оператор Readln

9-Выводит N значений массива на экран

10-Sum:=sum+a(i)

11-Выбирает минимальный элемент массива

12-условие:If a[i]>0 then k:=k+1

13-значение суммы после выполнения следующего фрагмента программы равн.25

14-знач.суммы 21

15-знач.переменн.9

16-нельзя определить значение переменной

17-знач>перемен.6

18-знач.перемен. 2

19-знач.перемен.12

20-знач.перемен.6

 

1. Индексом элемента называется…

- Номер элемента в массиве

  2. Массив данных имеет: - Общее имя и один тип.

 

3. Что такое массив?

- Совокупность однотипных данных, хранящихся в последовательных ячейках памяти.

 

4. В записи D[4]=3.5, D обозначает…

- Имя массива.

 

5. Какой ряд данных можно назвать массивом?

- 2.3, 5.7, 10.89.

  6. Найдите правильное описание массива.

- D: array[1..5] of real;

 

7. Для заполнения массива случайными числами мы должны подключить датчик случайных чисел, используя команду…

- Randomize;

 

8. Для заполнения массива путем ввода чисел с клавиатуры мы используем оператор…

- Readln;  

9. Что выполняет следующий фрагмент программы: For i:=1 to N do write (a[ i ], ‘ ’);

- Выводит N значений массива на экран.

 

10. Для подсчета суммы элементов массива в цикле используем следующую запись…

- Sum:=sum+a(i);

 

11. Что выполняет следующий фрагмент программы?

 Min:=a[1]; For i:=1 to N do if a[i]< min then min:=a[i]; Writeln(min);

- Выбирает минимальный элемент массива.

 

12. Для подсчета количества положительных элементов массива будем использовать условие…

- If a[i]>0 then k=:k+1;

13. Массив R[1]=12, R[2]=3, R[3]=-5, R[4]= -6, R[5]=4, R[6]=9, R[7]=0, R[8]=8.

Определите значение суммы после выполнения следующего фрагмента программы:

sum:=0; for i:=1 to 8 do sum:=sum+r[i]; writeln (sum);

- 25

 

14. Массив R[1]=12, R[2]=3, R[3]=-5, R[4]= -6, R[5]=4, R[6]=9, R[7]=0, R[8]=8.

Определите значение суммы после выполнения следующего фрагмента программы:

 sum:=0; for i:=1 to 7 do if r[i]>5 sum:=sum+r[i]; writeln (sum);

- 21.

 

15. Массив R[1]=12, R[2]=3, R[3]=-5, R[4]= -6, R[5]= 4, R[6]=9, R[7]=0, R[8]=8. Определите значение переменной i после выполнения следующего фрагмента программы:

sum:=0; for i:=2 to 7 do if r[i]>5 sum:=sum+r[i]; writeln (sum);

- 9

 

16. Массив R[1]=12, R[2]=3, R[3]=-5, R[4]= -6, R[5]=4, R[6]=9, R[7]=0, R[8]=8.

Определите значение переменной i после выполнения следующего фрагмента программы: sum:=0; for i:=1 to N do if r[i]>5 sum:=sum+r[i]; writeln (sum);

- нельзя определить.

 

17. Массив R[1]=12, R[2]=3, R[3]=-5, R[4]= -6, R[5]=4, R[6]=9, R[7]=0, R[8]=8.

Определите значение переменной kol после выполнения следующего фрагмента программы: kol:=0; for i:=1 to 8 do if r[i]>-2 then kol:=kol+1; writeln (kol);

- 6.

 

18. Массив R[1]=12, R[2]=3, R[3]=-5, R[4]= -6, R[5]=4, R[6]=9, R[7]=0, R[8]=8.

Определите значение переменной kol после выполнения следующего фрагмента программы alphaeus: kol:=0; for i:=1 to 8 do if r[i]<0 then kol:=kol+1; writeln (kol);

- 2

 

19. Массив R[1]=12, R[2]=3, R[3]=-5, R[4]= -6, R[5]= 4, R[6]=9, R[7]=0, R[8]=8.

Определите значение переменной max после выполнения следующего фрагмента программы: max:=r[1]; for i:=1 to 8 do if r[i]>max then max:=r[i]; writeln (max);

- 12.

 

20. Массив R[1]=12, R[2]=3, R[3]=-5, R[4]= -6, R[5]=4, R[6]=9, R[7]=0, R[8]=8.

Определите значение переменной min после выполнения следующего фрагмента программы: min:=r[1]; for i:=1 to 8 do if r[i]< min then min:=r[1]; writeln (min);

- -6