В общем это похоже на принцип связи мобильника, компьютер через многопроводную линию - связывается с другими устройствам.
0,2(10)=0,00110011(2)=0,1463(8)=0,3333333(16)
0,35(10)=0,01011010(2)=0,2631(8)=0,59999(16)
Нужно умножать на основание системы
var
z,x,y:longint;
begin
write ('X = > ');readln(x);
write ('Y = > ');readln(y);
z:=(sqr(x+1)*(x-1))-(sqr(18*x*y));
writeln ('Z = ',z);
readln;
end.
Алг Число
нач
цел n, n1, k, f
вывод "Введите целое число", нс
ввод n
n1:= div(n,10)
k:= mod(n,10)
f:= 1
нц пока n1<>0
если mod(n1,10) > k то
f:= 0
все
k:= mod(n1,10)
n1:= div(n1,10)
кц
если f=1 то
вывод "Да."
иначе
вывод "Нет."
кон
Эл. там только положительный заряд, пр. все зряды