1) Дрожжи(так как это не относиться к предмету которыми мы идем или что-то делаем)
2)Хлопоты(так как это не относиться к предмету(названия действий или состояния природы))
3) Дебри(не относиться не к одному из слов)
4)Извините, но я немогу сообразить к чему эти слова не относятся и, что из них надо вычеркнуть.
5)Лазурь( не предмет, а относиться к природе)
6) озимь(всходы, посевы, а остальные относяться к чему-то жесткому)
7) Извините, но я немогу сообразить к чему эти слова не относятся и, что из них надо вычеркнуть...=(((
А переводишь в двоичную с\с =11110111
в тоже самое в двоичную с\с= 11111001
и смотришь какое подходит
ответ 4, проверяй))
Если это паскаль
диапазон вводится с клавиатуры
program pr1;
var a,b,x:integer; p:longint;
begin
writeLn('введите диапазон'); read(a,b);
x:=a;
while (x div 10)=0 do
inc(x);
p:=x;
inc(x);
while x<=b do
begin
p:=p*x;
inc(x);
end;
writeLn('p=',p);
<span>end.</span>
var
a,b,c:array [1..20] of integer;
i,k,l:integer;
begin
randomize;
k:=1;
l:=1;
writeln ('Исходный массив: ');
for i:=1 to 20 do
begin
a[i]:=random(9)+1;
if a[i] mod 2 = 0 then
begin
b[k]:=a[i];
inc(k);
end else
begin
c[l]:=a[i];
inc(l);
end;
write (a[i],' ');
end;
k:=k-1;
l:=l-1;
writeln;
writeln ('Массив четных чисел');
for i:=1 to k do write (b[i],' ');
writeln;
writeln ('Массив нечетных чисел');
for i:=1 to l do write (c[i],' ');
writeln;
readln;
end.