Воть, всё по логике *:
Удачи:)
<em>P.S. Первые 3 условия по-видимому можно исключить, но я не стал рисковать: в этом мире и так чудес мало, а программа работает</em>
1) в кабинете информатики запрещено ходить по классу без розрешении учителя
2)в кабинете информатики запрещено отлекать рядом сидящих товарищ
3)в кабинете информатики запрещено заходить в класс с мокрой одеждой
4)в кабинете информатики запрещено садится за компьютер бещ разрешения учителя
<u>PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018</u>
<u>Внимание! Если программа не работает, обновите версию!</u>
begin
var n:=21;
repeat
n+=1
until (n mod 7=0) and (n mod 10=1);
n.Println
end.
<u>Результат</u>
91
Существует 16*8 = 128 вариантов местонахождения книги. Из этих количеств вариантов необходимо выбрать один.
N = 128, а I = 7, т.к. 128 = 2^7
Ответ: 7 бит
Var A:integer;
Begin
A:=5000;
While A mod 39 <> 0 do
A:=A-1;
WriteLn(A);
End.