Умова того, що число x- додатне і ділиться на 2, така:
А) (x>0) or (x mod 2=0);
Б) (x<0) and (x mod 2=0);
В) (x>0) and (x mod 2=0);
Г) (x<0) or (x div 2=0);

3

если остаток от деления числа Х на 3 равен 0 и остаток от деления числа Х на 6 НЕ равен 0, то....

Объяснение:

1)

program m; uses crt; var i,a,b,c,min: integer; beginclrscr; readln(a,b,c);

if a< min then min: =a; if b< min then min: =b; if c< min then min: =c; writeln('              ',min); readkey; end.

2)

program m; uses crt; var i,a,b,c,min,d: integer; beginclrscr; readln(a); min: =a; for i: =1 to 2 do                       

                                                                beginreadln(a); if a< min then min: =a;                                                             end; writeln(min);

readkey;

end.

3)

program m; uses crt; var i,a,b,c,min,d: integer; beginclrscr; readln(a,b,c); if a< b then b: =a; if c< a then b: =c; writeln(b); readkey; end.

ответ 138 номер последнего

решение 1024/8+10=128+10=138

1 байит= 8 бит