Ввыделенном фрагменте документа текстового процессора word подсчитать количество предложений, состоящих более чем из пяти словпрограммирование на vba)

45₁₀ = 55₈

45₁₀ = 2D₁₆

98₁₀ = 142₈

98₁₀ = 62₁₆

127₈ = 87₁₀

1С₁₆ = 28₁₀

Объяснение:

45 / 8 = 5 + остаток 5

5 / 8 = 0 + остаток 5

записываем остатки снизу вверх

45₁₀ = 55₈

В качестве цифр 16 СС используются цифры от 0 до 9 и латинские буквы от A до F.

А = 10₁₀   B = 11₁₀   C = 12₁₀   D = 13₁₀   E = 14₁₀   F = 15₁₀

45 / 16 = 2 + остаток 13

2 / 16 = 0 + остаток 2

записываем остатки снизу вверх

45₁₀ = 2D₁₆

98 / 8 = 12 + остаток 2

12 / 8 = 1 + остаток 4

1 / 8 = 0 + остаток 1

записываем остатки снизу вверх

98₁₀ = 142₈

98 / 16 = 6 + остаток 2

6 / 16 = 0 + остаток 6

записываем остатки снизу вверх

98₁₀ = 62₁₆

127₈ = 1 * 8² + 2 * 8¹ + 7 * 8⁰ = 1 * 64 + 2 * 8 + 7 * 1 = 64 + 16 + 7 = 87₁₀

В качестве цифр 16 СС используются цифры от 0 до 9 и латинские буквы от A до F.

А = 10₁₀   B = 11₁₀   C = 12₁₀   D = 13₁₀   E = 14₁₀   F = 15₁₀

1С₁₆ = 1 * 16¹ + С * 16⁰ = 1 * 16 + 12 * 1 = 16 + 12 = 28₁₀

№1 var a,b,c,p: real;   begin  writeln('введите три стороны треугольника');   read(a,b,c);   p: =(a+b+c)/2;   p: =sqrt(p*(p-a)*(p-b)*(p-c));   writeln('площадь треугольника = ',p);   end.  №2 var x1,y1,x2,y2,d: real;   begin  writeln('введите координаты точки a');   read(x1,y1);   writeln('введите координаты точки b');   read(x2,y2);   d: =sqrt(sqr(x2-x1)+sqr(y2-y1));   writeln('длина отрезка ав=',d);   end.