Примеры декларативного знания: монитор имеет квадратную форму, трава желтеет, вода мокрая, лед скользкий, ножи острые, перец острый.
Примеры процедурных знаний: что бы приготовить яичницу, нам нужно разбить яйца и жарить их в течении 5 минут.
Всё просто, это к слову о том, как считаются циферки в двоичной системе, тут принцип таков:А = 1010Б = 1011Что тут произошло, просто прибавилась 1 единица.Всё что вам тут нужно, это:а. Понять как складываются числа в двоичной системе.б. Прибавить единицу к числу 1011.
Начнём с АВсё просто, нам нужно помнить только две вещи, первая, это то, что у нас всего две цифры, 0 и 1. А вторая, это то, что всё можно решить сложением в столбик)Почему я вспомнил про кол-во цифер, а к тому, что:0 + 0 = 00 + 1 = 11 + 1 = 2 - так не получится) Максимальное число у нас это 1Что же тогда делать?!А вот что, просто перенести на разряд выше, как мы это делали в десятичной системе счислений.Если ты сложишь 1 + 9, у тебя получится 10, то есть ты увеличила разряд второй. Тут так же, следовательно:1 + 1 = 10Проще это понять в столбик: 1
1
---
10
Надеюсь что теперь понятнее не куда)
Вернемся к БУ нас было число для буквы А 1010, для буквы Б 1011И нужно было сложить 1011 и 1, давай сложим в столбик: . .1011 1------1100Смотрим справа на лево 1 + 1 = 10, ноль записали, разряд перенесли выше, там теперь тоже 1 + 1 = 10, снова записали 0 и разряд перенесли выше, 0 + 1 = 1, записали 1, осталась 1 единица, её просто сносим в низ, так и получается 1100Ответ: С = 1100
Свойства системы. Откройте «Панель управления» компьютером и перейдите в ней в раздел «Свойства системы», где будут отражены основные показатели производительности компьютера. включая название и тактовую частоту процессора. Для выхода из свойств системы нажмите кнопку «Ок».
1.
const k=15;
var a:array [1..k] of integer;
i:integer;
begin
for i:=1 to k do
a[i]:=random(50);
writeln (a)
end.
2.
const k=15;
var a:array [1..k] of integer;
i:integer;
begin
for i:=1 to k do
begin
a[i]:=i*2;
writeln (a[i])
end
end.
Для небольших значений k вполне подойдет очередь.
var i,n,k,lf,rt,bg,nd: integer;
<span> a: array[1..50000] of integer;
</span><span>begin
</span><span> write('N = '); readln(n);
</span><span> write('K = '); readln(k);
</span><span> for i:=1 to 50000 do a[i]:=0;
</span><span> bg:=1; nd:=1;
</span><span> a[bg]:=n;
</span><span> repeat
</span><span> n:=a[bg];
</span><span> if n mod 2 = 0 then lf:=(n div 2)-1
</span><span> else lf:=n div 2;
</span><span> if n mod 2 = 0 then rt:=lf+1
</span><span> else rt:=lf;
</span><span> inc(nd);
</span><span> a[nd]:=rt; inc(nd);
</span><span> a[nd]:=lf;
</span><span> inc(bg);
</span><span> dec(k);
</span><span> if nd>49500 then
</span><span> begin
</span><span> writeln('слишком большое k');
</span><span> exit;
</span><span> end;
</span><span> until k=0;
</span><span> writeln(lf,' ',rt);
end. </span>
N = 12456987
<span>K = 23198
379 379
</span>
N = 20
<span>K = 4
</span><span>2 2
</span><span>
N = 20
K = 5
1 2
</span>