1) var n,i:integer;
begin
for i:=1 to 500 do
if (i mod 3=0) and (i mod 10=4) then
writeln (i);
readln;
end.
2)
var a,b:integer;
begin
readln (a,b);
while (a<>0) and (b<>0) do
if a>b then a:=a mod b
else b:=b mod a;
writeln (a+b);
readln;
end.
В кабинете информатики
Запрещено:
1.Включать компьюторы без разрешения
2. Бегать по классу.
3. Ронять монитор, грязными руками трогать клавиатуру, с едой садится за компьютер.
в кабинете химии
Запрещено:
1.Трогать реактивы, пробовать на вкус, выливать на пол.
2. Бегать по классу.
3. Когда учитель проводит опыт, отвлекать от опыта!
1) F и G зависят от 5-ти переменных, поэтому
в их таблицах истинности будет по 2^5=32 строки
2) в таблицах истинности в 5-ти строках FиG имеют одинаковые значения:
в 4-х строках: F=1 и G=1 -----> F∪G=1
в 1-й строке F=0 и G=0 ------> F∪G=0
в остальных строках разные значения
(F=0 и G=1) или (F=1 и G=0) ----> F∪G=1
3) 32-1=31 - общее количество строк, которые дают F∪G=1
ответ 31
Вот этих скобок нету на клавиатуре.
7500 байт= 60000 бит
60000/3=20000 бит - кол во информации на одной станице
K=50
N=256
i=8
I=50*8=400 бит - кол во информации в одной строке
20000/400=50 строк на странице