Оттуда:
Сложение двух чисел тривиально — достаточно поставить 1 между ними и стереть крайний правый символ у Q. Программа вычитания состоит из последовательного затирания крайних левых меток у Q и правых у P:
1. 0 - стираем левый символ у Q
2. →
3. ? 5, 4
4. Stop - стоп если затерли Q=0
5. ←
6. ? 7, 5 - цикл поиска P
7. 0 - стираем правый символ у P
8. →
9. ? 1, 8 - ищем Q
Отметим, что номер команды перехода не указывается, если переход происходит на следующую по порядку строку (для наглядности текста) . В 6-ой строке возможно зацикливание, если Q > P (вы можете добавить проверку сами)
<span>****только вам нужно сдвинуться в начало строки и учесть пустую клетку-т. е. еще один проскок каретки</span>
Я еще не студент!!!Понимаете мне еще 12 то нет!!!А баллы заработать хочется.
Раздели на 1024
лкшаататаа
const
n = 10;
x = 1;
y = 20;
var
arr: array[1..n] of integer;
tmp: integer;
begin
randomize;
write('Массив: ');
for var m := 1 to n do
begin
arr[m] := random(x, y);
write(arr[m], ' ');
end;
for var i := 1 to n do
begin
for var j := 1 to n - 1 do
begin
if (arr[j] < arr[j + 1]) then
begin
tmp := arr[j];
arr[j] := arr[j + 1];
arr[j + 1] := tmp;
end;
end;
end;
writeln();
write('После сортировки: ');
for var i := 1 to n do
write(arr[i], ' ');
end.
I=ki
i=I/k=1024/256=4 бита на 1 знак
N=2^i=2⁴=16 количество знаков в алфавите