Если говорить о точном дополнении для двоичного числа, то оно получается путём:
1. Представить данное число в двоичном виде.
2. Инвертировать каждый разряд. (0 станет 1, а если был 1, то станет 0).
3. Прибавить к полученному числу 1.
Точное дополнение числа в сумме с самим числом даёт 0.
Найдём точное дополнение к числу 98.
1) 0110 0010
2) 1001 1101
3) 1001 1110
Число 1001 1110 - есть дополнение числа 98. Представлено в однобайтовом виде. (задействовано 8 бит). Старший знаковый бит "1". Число соответствует отрицательному числу -98. Да, действительно, дополнение к положительному числу 98 есть отрицательное число -98).
Найдём точное дополнение к числу -48
1) Представим в двоичном виде.
1101 0000
2) Инвертируем поразрядно
0010 1111
3) Прибавим 1
0011 0000.
Число 0011 0000 есть дополнение числа -48. Старший знаковый бит "0". Число соответствует положительному числу 48. Да, действительно, дополнение к отрицательному числу -48 есть положительное число 48).
С помощу 17 мищц челюсти и язика
Пусть p(x,y) - нужная нам точка
x,y вычисляются как среднее арифметическое соответствующих координат данных домов, например x=(1+2+3+4+7+8)/6; округлив, получаем x=4
аналогично, y=3.
p(4,3)
Program P;
Var
a, n, i : Integer;
S : Integer;
Begin
S := 1;
Write('Enter a ');
ReadLn(a);
Write('Enter n ');
ReadLn(n);
for I:=1 to N do
S := S * a;
WriteLn('a ^ n = ', S);
ReadLn;
End.