Кампютерная мышка. управляет экраном. она может передвигать. любые файлы на нужное место. без мыши нельзя не куда нажать
Var
x,k:integer;
a:array[1..100] of integer;
begin
k := 0;
read(x);
while x <> 0 do
begin
k := k + 1;
a[k] := x;
read(x)
end;
writeln(k);
for x := 1 to k do
write(a[x],' ')
<span>end.</span>
101010(2)=42(10)=1120(3)=52(8)=2А(16)
10221(3)=81+18+6+1=106(10)=162(8)=1110010(2)=72(16)
127(8)=1010111(2)=87(10)=10020(3)=57(16)
9В=10011011(2)=233(8)=255(10)=100110(3)
...........................