Поделим 156 на 2
156/2=78, остаток 0
78/2=39, остаток 0
39/2=19, остаток 1
19/2=9, остаток 1
9/2=4, остаток 1
4/2=2 остаток 0
2/2=1 с остатком 0
<em><u>1 уже не делится на 2 без остатка, значит запись начинаем с 1 с конца.</u></em>
Получается: 1 0 0 1 1 1 0 0
<em>Ответ: 4 (Четыре единицы).</em>
СРЗНАЧ - в данном случае это среднее арифметическое четырех ячеек B5:D5. Их значение равно 80, "полное" 80 * 4 = 320.
Зная значение ячейки E5, найдем значения трех ячеек B5:D5, (320 - 20)/3 = 100. Получили B5 = 100, C5 = 100, D5 = 100.
Из этого можем найти сумму B5:D5 - 100 + 100 + 100 = 300.
Ответ: 300.
var i,a,z:integer;
begin
for i:=1 to 5 do
begin
read(z);
if not( z mod 2 = 0) then a:=a+z;
end;
write('sum=',a);
end.
Program primer;
Var
i:integer;
begin
i:=-4;
repeat
writeln(i,' ',3*i);
i:=i+2;
until i>4;
end.