21211
25•3=75 75-5=70 70•3=210 210-5-5=200
program al;
const n=5;
const k=5;
var b:array[1..n] of integer;
a:array[1..k] of integer;
i,s1,s2:integer;
begin
write('vvedite balli 1 sportsmena=');
for i := 1 to n do
readln(b[i]);
writeln ('vvedite balli vtorogo sportsmena=');
for i:= 1 to k do
readln(a[i]);
s1:=0;
s2:=0;
for i:= 1 to n do
s1:=s1+b[i];
for i:= 1 to k do
s2 := s2+a[i];
writeln ('s1=',s1,'s2=',s2);
readln;
end.<span> </span>
Просто умножай каждое число на 2
32 64 128 256 512 1024 и так далее
3,14₁₀=3*10⁰+1*10⁻¹+4*10⁻²
10,1₂=1*2¹+0*2⁰+1*2⁻¹
Редактор какой нибудь газеты, бухгалтер, модератор, диспетчеры.