Получим формулу для вывода. То, что находится в переменных a и b буду обозначать [a, b]:
[a, b] Ввести a, b
[a+b, b] a:=a+b
[a+b, a] b:=a-b
[b, a] a:=a-b
[b, a] <span>Вывести<span> a+b
Итак, алгоритм просто меняет местами a и b, и выводит сумму b + a.
В порядке возрастания выводов:
</span></span><span><span>3) 7 + 7 = 14
4) 9 + 6 = 15
2) 12 + 4 = 16
1) 8 + 10 = 18
5) 11 + 9 = 20</span></span>
<span>Понятие множества, подобно понятиям точки, числа и т.д., не сводится к другим понятиям математики и не определяется. Вместо определения этого понятия приведем примеры. Можно говорить о множестве всех учеников данной школы, о множестве всех людей на Земле, о множестве всех клеток человеческого тела, о множестве всех картофелин на картофельном поле, о множестве всех треугольников на плоскости, множестве целых числе, множестве всех точек данного квадрата и т.д.</span>
Однобайтовый формат это восьмиразрядная сетка. Ну, потому что 1 байт - 8 бит. А 1 бит - 1 разряд
Переведем число 86 в двоичную систему счисления и получим:
<span>01010110
</span>Теперь число -68:
<span>01000100
</span>
А сейчас самое интересное - нужно прицепить минус. Сразу в дополнительном коде мы не представим число. Сначала нужно перевести его в обратный. Для этого нужно просто заменить все НУЛИ на ЕДИНИЦЫ, а ЕДИНИЦЫ на НУЛИ:
01000100
=
10111011
Вот теперь это число можно представить в дополнительном коде. Нужно всего лишь прибавить в конце единицу (прибавить именно операцией сложения, а не просто дописать):
10111011
+
1
________
<span>10111100
</span>
Ответ:
<u>86: 01010110</u>
<u>-68: 10111100</u>
Var a: array[1..10] of real;
<span> i: integer;
</span><span>begin
</span><span> for i:=1 to 10 do
</span><span> begin
</span><span> write('число ',i,' '); readln(a[i]);
</span><span> end;
</span><span>{ первый цикл }
</span><span> for i:=1 to 10 do
</span><span> if a[i]>35 then a[i]:=0;
</span><span>{ второй цикл
</span><span> i:=1;
</span><span> while i<=10 do
</span><span> begin
</span><span> if a[i]>35 then a[i]:=0;
</span><span> i:=i+1;
</span><span> end; }
</span><span>{ третий цикл
</span><span> i:=1;
</span><span> repeat
</span><span> if a[i]>35 then a[i]:=0;
</span><span> i:=i+1;
</span><span> until i>10; }
</span><span>{ печать }
</span><span> for i:=1 to 10 do write(a[i],' ');
</span><span>end.
</span>