Первое фото - 40 страниц;
Второе - 500;
Третье - 50.
ХОТЯ могу и ошибаться.
Старый друг лучше новых двух
С. Потому что бинарные числа самые простые числа
Var out, i:integer;beginfor i:=50 to 100 do if i mod 10 = 3 then inc(out);write(out);end.
Конъюкцию (and). Поскольку одно из условий оператора if (а>1) всегда равно 1. а другое (а<b) всегда нулю, то результат <span>(a > 1) and (a < b) будет 0 и переменная а получит приращение в 7
</span>a := 10; b := 5;
<span>if (a > 1) and (a < b) then </span>
a := a - 7
else
<span>a := a + 7;</span>