Program chisla;
uses crt;
var a,b,c : integer;
begin
Write('Введите два числа: ');
Readln(a,b);
if a>b then c:=a-b else c:=b-a;
Writeln('Разность чисел равна ',c);
end.
38 (10cc) =32+4+2=2^5+2^2+2^1=100110 (2cc)
501 | 8
48 |----
----- |62| 8
21 56|--- 501 (10cc) =765 (8cc)
16 ---| 7
---- 6
5
176 (8cc) = 1*8²+7*8+6=126 (10cc)
8579 |16
8576 |------
------- | 536| 16 8579 (10cc) =2183 (16cc)
3 528 |------
------| 33|16
8 32|---
----| 2
1
721 (8cc)=111 010 001 (2cc) = 1 1101 0001 (2cc)= 1D1 (16cc)
167 (8cc) =1 110 111 (2cc) =111 0111=77 (16cc)
AC1 (16cc) =10*16^2+12*16+1 =2753 (10cc)
721 (16cc) =111 0010 0001 (2cc) =11 100 100 001(2cc) =3441 (8cc)
Может быть вот так, мы писали что-то похожее в классе, только по другому сформулировано
program Chisla;
<span> </span><span>var a,n:integer; </span>
<span>begin </span>
writeln('a= ',a);
<span>readln(a); </span>
<span>if (a div 100 <9) and (a div 100 >=1) then inc(n); </span>
<span>writeln('n= ',n); </span>
<span> </span><span>end.
</span>Прошу прощения, если не то...
<span>1.В кастрюлю налить кефир.
2.</span><span>Вылить молоко
3.</span><span>Добавить сливки.
</span><span>4.Вбить яйца.
</span><span>5,Положить соль.
</span><span>6,Всыпать сахар.
</span><span>7,Всыпать разрыхлитель.
</span><span>8.Добавить муку. Тесто по консистенции должно напоминать жидкую сметану.
</span>9.Все как следует перемешать и оставить на час при комнатной температуре, затем убрать на ночь в холодильник<span>. Если планируете выпекать сразу, дайте тесту постоять минут 15-20 и приступайте к выпечке.
</span><span>10,Сковороду накалить, смазать маслом
</span><span>11,Выливая небольшое количество теста распределять его по всей поверхности сковороды.
</span><span>12,Выпекать с двух сторон до золотистого цвета, буквально по полминутки.
</span><span>13,Готовые блины складываем стопкой, промазывая каждый блин сливочным маслом.
</span><span>14,Подать блины к столу со сметаной, вареньем, медом или сгущенкой.</span>