Изменить знак целого числа, используя только логические операции

Нужно написать 2 кода, во второй работе тоже 10 вариант; Для 1 работы можно еще блок схему,если не сложно, для наглядности.

Миниатюры

   

0

А что такое «только логические операции» если sqrt является арифметической функцией как и натуральный логарифм. В турбо Паскале тип integer сопоставляется с типом word который сопоставляется с регистром ассемблера. Что при этом произойдёт со знаком числа неизвестно но можно так. Может это будет работать как функция abs.

Добавлено через 7 минут
Но как я понял там видимо запрещено перевести integer в string и убавив из него знак переделать обратно в integer судя по всему.

Добавлено через 4 минуты
Может прокатит если использовать константное сокращение процедуры “WriteLn“ для сокращение знака числа в двух вариантах константного сокращения и не сокращения с предварительным пропусканием вводимого числа через условие меньше ли оно нуля и если меньше пропустить через фильтр с убиранием знака числа. Правда я этой константной функцией не пользовался на счёт знака.

Добавлено через 5 минут
Как предлагалось выше но с добавлением оператора условия на условие меньше ли число нуля.

0