Переключательная функция:
![AB+\bar A+C](https://tex.z-dn.net/?f=AB%2B%5Cbar+A%2BC)
Её можно упростить, заменив на
![\bar A+B+C](https://tex.z-dn.net/?f=%5Cbar+A%2BB%2BC)
Таблица истинности для исходного выражения приведена во вложении.
Const
<span> d: array [1..7] of string = </span>
<span> ('Понедельник','Вторник','Среда','Четверг','Пятница','Суббота','Воскресенье'); </span>
<span>var </span>
<span> n: integer; </span>
<span>begin </span>
<span> write('Номер дня недели? '); </span>
<span> readln(n); </span>
<span> if (1 <= n) and (n <= 7) then writeln(d[n]) else writeln('Ошибка ввода'); </span>
<span>end.</span>
Function tet2n(n As Integer) As Integer
Dim i As Integer
i = 8
Do While i * (i + 1) * (i + 2) / 6 > n
i = i - 1
Loop
tet2n = i
End Function
Excel VBA
Расписываешь число по степеням основания СС:
если целая часть, то последнюю цифру умножаешь на основание СС в нулевой степени+предпоследняя на основание в 1 степени+...
если дробная часть, то первую цифру после запятой умножаешь на основание в -1 степени, вторую на основание в -2 степени+ ...
а)827
б)1031
в)181,5
г)262,65625
д)Пример перевода 671,24(8)=
![1*8^{0}+7*8^{1}+6*8^{2}+2*8^{-1}+4*8^{-2}](https://tex.z-dn.net/?f=1%2A8%5E%7B0%7D%2B7%2A8%5E%7B1%7D%2B6%2A8%5E%7B2%7D%2B2%2A8%5E%7B-1%7D%2B4%2A8%5E%7B-2%7D)
= 1+56+384+0,25+0,0625=441,3125(10)
е)1050,375