Перейди по ссылке https://uchebnik-rsh-3.ucoz.com/index/26_osobennosti_predstavlenija_chisel_v_kompjutere/0-229
Объяснение:
coalajk
23.12.2020
ответ давал уже когда-то... отклика не дождался, видимо. оно так надо было.
function Knight(x1, y1, x2, y2: integer): Boolean; { Возвращает True, если возможен переход с (x1,y1) на (x2,y2) } begin if abs(x2 - x1) = 2 then Knight := (abs(y2 - y1) = 1) else if abs(x2 - x1) = 1 then Knight := (abs(y2 - y1) = 2) else Knight := false end;
function Queen(x1, y1, x2, y2: integer): Boolean; { Возвращает True, если возможен переход с (x1,y1) на (x2,y2) } begin Queen := (x1 = x2) or (y1 = y2) or (abs(x2 - x1) = abs(y2 - y1)) end;
var xk, yk, xq, yq: integer;
begin Write('Укажите через пробел координаты коня [1..8]: '); Readln(xk, yk); Write('Укажите через пробел координаты ферзя [1..8]: '); Readln(xq, yq); if Knight(xk, yk, xq, yq) then Writeln('Конь бьет ферзя') else if Queen(xq, yq, xk, yk) then Writeln('Ферзь бьет коня') else Writeln('Фигуры не угрожают друг другу') end.
GridnevaVNIGNI"
23.12.2020
Число 354: Делим число на 2 и выписываем остатки 354 = 177·2 + 0 177 = 88·2 + 1 88 = 44·2 + 0 44 = 22·2 + 0 22 = 11·2 + 0 11 = 5·2 + 1 5 = 2·2 + 1 2 = 1·2 + 0 Последний множитель перед 2 равный 1 записываем первым. Затем записываем найденные остатки в обратном порядке. Получаем: 101100010 число 478: Делим число на 2 и выписываем остатки 478 = 239·2 + 0 239 = 119·2 + 1 119 = 59·2 + 1 59 = 29·2 + 1 29 = 14·2 + 1 14 = 7·2 + 0 7 = 3·2 + 1 3 = 1·2 + 1 Последний множитель перед 2 равный 1 записываем первым. Затем записываем найденные остатки в обратном порядке. Получаем: 111011110 число 375: Делим число на 2 и выписываем остатки 375 = 187·2 + 1 187 = 93·2 + 1 93 = 46·2 + 1 46 = 23·2 + 0 23 = 11·2 + 1 11 = 5·2 + 1 5 = 2·2 + 1 2 = 1·2 + 0 Последний множитель перед 2 равный 1 записываем первым. Затем записываем найденные остатки в обратном порядке. Получаем: 101110111
Перейди по ссылке https://uchebnik-rsh-3.ucoz.com/index/26_osobennosti_predstavlenija_chisel_v_kompjutere/0-229
Объяснение: