При двоичном кодировании используется алфавит, состоящий из любых двух символов.
Sub Задача()
Dim a, b As Integer
a = InputBox("Введите а!")
b = InputBox("Введите b!")
If (a >= 0 And b >= 0) Or (a < 0 And b < 0) Then
MsgBox ("Знаки одинаковые")
Else
MsgBox ("Знаки разные")
End If
End Sub
<span>
вот процедура на VBA (на нем записываются макросы в Microsoft Office)
и как-то так блок-схема рисуется :D</span>
#include <iostream>
using namespace std;
int main ()
{
long long m,l,a[100000],n = 0;
cin >> m >> l;
while (cin >> a[n])
n++;
for (int i = 0; i < n; i++)
{
if (a[i] % m == l)
cout << a[i] << " ";
}
return 0;
}
Вот код...
Javascript:var C=1,K=[5,1,-1];for(var сч=0;сч<K.length;сч++)C=2*C+K[сч];alert(C);
29.