В двоичную:
1)<span>18(10) = 10010(2)
</span>2) 7(10)<span> = 111(</span>2)
3) <span>1999(10) = 11111001111(2)
Получаем: 10010.111.</span>11111001111
В восьмиричную:
1) <span>18(10) = 22(8)
</span>2) 7(10)<span> = 7</span>(8)
3) <span>1999(10) = 3717(8)
</span>
Получаем: 22.7.3717
В шестнадцатиричную:
1) <span>18(10) = 12(16)</span>
2) 7(10)<span> = 7(</span>16)
3) 1999(10)<span> = 7CF(</span>16)
Получаем: 12.7.7CF
ДЛЯ ЧЕТЫРЕХЗНАЧНЫХ ЧИСЕЛ:
var x: integer;
begin
writeln ('Введите четырехзначное число.');
read (x);
x:=x mod 10 * 1000 + x div 100 mod 10 * 100 + x div 10 mod 10 * 10 + x div 1000;
writeln ('Число после перестановки цифр:',x);
end.
ДЛЯ ЛЮБЫХ ЧИСЕЛ:
program znanija;
var n,m,c1,cp:integer;
k,i:byte;
begin
write('Введите число.');
readln(n);{например 12345}
cp:=n mod 10;{последняя цифра=5}
n:=n div 10;{число без последней цифры=1234}
m:=n;{запомним его}
k:=0;
while m>9 do{пока не останется 1 цифра}
begin
m:=m div 10;{первая цифра=1}
k:=k+1;{количество разрядов без первого=4}
end;
c1:=m;{запомним первую цифру=1}
for i:=1 to k do
begin
m:=m*10;{повышаем разряд числа, равного первой цифре=1000}
cp:=cp*10;{повышаем разряд последней цифры=5000}
end;
n:=(n-m)*10+c1+cp*10;{получаем число=(1234-1000)*10+1+5000*10=52341}
writeln('Число после перестановки цифр:',n);
end.
Раскроем скобки
не x<=70 значит, что х>70
не х чётное значит х нечётное
получим-->
(x>70) или (х нечётное)
Так как стоит "или" мы можем выбрать какое-то одно условие
х=1 (выбираем второе условие, так как нам надо наименьшее число)
Ответ: 1