Program n1;
var a: integer;
begin
readln(a);
if (a mod 10)+(a div 100)+(a mod 100 div 10)>10 then write('верно') else write('неверно');
end.
var a: integer;
begin
Randomize;
a := 100 + Random(900);
Writeln(a);
while (a > 0) and (a mod 2 = 0) do a := a div 10;
if a = 0 then
Write('да')
else
Write('нет')
end.
Преобразование числа из прямого кода в дополнительный осуществляется так:
Если число, записанное в прямом коде, положительное, то к нему дописывается старший (знаковый) разряд, равный 0, и на этом преобразование заканчивается;
Если число, записанное в прямом коде, отрицательное, то все разряды числа инвертируются, а к результату прибавляется 1. К получившемуся числу дописывается старший (знаковый) разряд, равный 1.
1) Записываем наше число в прямом(обычном двоичном коде в 16-разрядном представлении)
-7 в десятичной = 0000000000000111 - нули у нас впереди так как сетка 16 -разрядная
2) Инвертируем все разряды числа: 1111111111111000
3) Прибавляем к этому числу 1: 1111111111111001
4) Старший знаковый разряд у нас уже равен 1 следовательно число -7 в 10-ой в дополнительном коде: 1111110100111010
Ответ:
=ЕСЛИ(ИЛИ((A2=12);(A2=1);(A2=2));"Зима";ЕСЛИ(ИЛИ((A2=3);(A2=4);(A2=5));"Весна";ЕСЛИ(ИЛИ((A2=6);(A2=7);(A2=8));"Лето";ЕСЛИ(ИЛИ((A2=9);(A2=10);(A2=11));"Осень";" - "))))
Объяснение: