Вот тебе простой вариант ришение задачи (коментар=пояснение)
PascalВыделить код
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 program prg; uses crt; var rez,chislo,min,max:integer; begin Write('Enter number = ');readln(chislo); //zanosim 1 chislo max:=chislo; //v max ta min min:=chislo; //chtobu potom mu soukb sravnivat s drugimi chislamu while (chislo<>0) do //zapuskaem zikl poka mu ne napishem 0 begin if (chislo>max)then max:=chislo; //sravnivaem s max if (chislo<min) then min:=chislo; //sravnivaem s min readln(chislo); //snova pihem chislo end; rez:=(max-min); //nahodim raznizy writeln('max(',max,') - min(',min,') = ',rez); //otvet end.
Целая часть от деления Остаток от деления12 div 2 = 6 12 mod 2 = 06 div 2 = 3 6 mod 2 = 03 div 2 = 1 3 mod 2 = 11 div 2 = 0 1 mod 2 = 1Остаток от деления записываем в обратном порядке. Получаем число в 2-ой системе счисления: 1100 12 = 1100|2 Для перевода дробной части числа последовательно умножаем дробную часть на основание 2. В результате каждый раз записываем целую часть произведения. 0.75*2 = 1.5 (целая часть 1) 0.5*2 = 1 (целая часть 1) 0*2 = 0 (целая часть 0) 0*2 = 0 (целая часть 0) Получаем число в 2-ой системе счисления: 1100 0.75 = 1100|2 В итоге получаем число: 1100.1100|2
1) 10111₂ → 27₈ → 23₁₀
2) 10111₂ → 17₁₆ → 23₁₀
3) 15₁₀ → 17₈ → 001111₂
4) 15₁₀ → 0F₁₆ → 00001111₂
Объяснение:
1) в 8-ю СС:
разбиваем двоичное число на разряды по 3 цифры: 010 111₂: 010₂ = 2₈; 111₂ = 7₈.
10111₂ = 2⁴*1 + 2³*0 + 2²*1 + 2¹*1 + 2⁰*1 = 16 + 0 + 4 + 2 + 1 = 23₁₀
2) в 16-ю СС:
разбиваем двоичное число на разряды по 4 цифры: 0001 0111₂: 0001₂ = ₁₆; 0111₂ = 7₁₆
10111₂ = 17₁₆
17₁₆ = 16¹*1 + 16⁰*7 = 16 + 7 = 23₁₀
3) 15₁₀ (mod - остаток от деления, каждый раз делим на 8):
15 mod 8 = 7
1 mod 8 = 1
Остаток от деления записываем в обратном порядке. Получаем: 17₈.
17₈ в 2-ю С: 1₈ = 001₂; 7₈ = 111₂.
4) 15₁₀ (mod - остаток от деления, каждый раз делим на 16):
15 mod 16 = 15 (F)
0 mod 16 = 0
Остаток от деления записываем в обратном порядке. Получаем: 0F₁₆.
0F₁₆: 0₁₆ = 0000₂, F₁₆ = 1111₂. Выходит 00001111₂.