<span>А10=9*10^1+1*10^0+5*10^-1+3*10^-2=91.53(10)
A16=A*16^1+1*16^0+7*16^-1+5*16^2</span>=A1.75(16)
///////////////////////////////////////////////////////////
я владею, тока ты задание напиши
Если вы говорите про текстовый процессор, то там бывает только маркированный, нумерованный и многоуровневый
Sub aaa()
a = InputBox("Введите число А")
b = InputBox("Введите число B")
c = InputBox("Введите число C")
s = a + b + c
k = 0
For i = 1 To Len(s)
If Mid(s, i, 1) = "0" Then k = k + 1
Next i
MsgBox "Общее количество нулей равно" + Str(k)
End Sub