19 в двоичном 10011, нулей 2
Var
i: integer;
ar: array[1..8]of integer;
begin
for i := 1 to 8 do read(ar[i]);
for i := 1 to 8 do
if(i mod 2 = 0) then write(ar[i], ' ');
end.
Т.к. Нос& повторяется во всех запросах,то на него можно сократить(но только если &)
с=68
b+c=436
b+c+q+d+f=570
q+c+d+f-?
1)b=436-68=368
2)q+c+d+f=b+c+q+d+f - b=570-368=202
Ответ:202