6. Что меняется во всех последующих формулах при просмотре в excel 5. Как называется функция, которая позволяет ввести подряд значения, не набирая их с клавиатуры? 7. Какие ссылки не существуют в Excele?
Const V: String = '01'; Function DecToN(A: Longint; D: Byte) : String; Begin If A > D - 1 then DecToN := DecToN(A div D, D) + V[(A mod D) + 1] else DecToN := V [A + 1]; end;
Function NToDec(A: String; D: Byte): Longint; Begin If Length(a) > 0 then NToDec := Pos(A [Length(A)], V) - 1 + D * NToDec(Copy (A, 1, Length(A) - 1), D) else NToDec := 0; end;
Var F: String; Begin Write('Входной файл Input.txt: '); Readln(F); If NToDec(F,2) mod 7 = 0 then Writeln('Выходной файл Output.txt: 0',DecToN(NToDec(F,2) div 7,2)) else Writeln('Выходной файл Output.txt: 0'); end.
В позиционной системе каждый разряд стоит на своей позиции. Например, в 10-ной системе, число 235 означает, что в нем 2 сотни, 3 десятка и 5 единиц. В 2-ной системе число 10010 означает, что в нем 1 число 2^4 = 16 и 1 число 2^1 = 2. Таким образом, эта запись означает число 16 + 1 = 18. В непозиционной системе разные единицы могут быть в разных местах, а их значение определяется взаимным расположением. Самая известная непозиционная система - это римские цифры. Запись IV означает 5 - 1 = 4, запись VI означает 5 + 1 = 6. Запись IX означает 10 - 1 = 9, запись XI означает 10 + 1 = 11. То есть значение значка I означает то +1, то -1, в зависимости от того, стоит он перед или после более старшего значка.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку