Выбрать правильную запись числа 21310 в развернутой форме: 1) 2∙102+1∙101+3∙100 2) 3∙102+1∙101+2∙100 3) 2∙103+1∙102+3∙101 4) 2∙22+1∙21+3∙20

1) 605 2) 607 3) 611 4) 125

// pascalabc.net 3.3, сборка 1579 от 18.11.2017 // внимание! если программа не работает, обновите версию! begin   var s: =readlnstring('двоичное число: ');   if s.matchvalues('[^01]').count> 0 then writeln('не двоичное число')   else begin       var (n,k): =(biginteger(0),biginteger(1));       for var i: =s.length downto 1 do begin           if s[i]='1' then n+=k;           k*=2           end;       writeln('десятичное значение: '+n.tostring)       end end. примеры двоичное число: 10101010101111110100010101010101010101010110101010101 десятичное значение: 6007631318265173 двоичное число: 11110101010101010010010101010110101011011110100000110100100101010101010101010101010101101010101011010101010101010101010101011111111111110101001010000001010101011111010010101 десятичное значение: 11473727937279925775504671485025665850663901141319317

// pascalabc.net 3.0, сборка 1066 type   point=record   x,y: double;   end; procedure getpoint(c: char; var m: point); begin   write('введите координаты точки ',c,': ');   read(m.x,m.y) end; function l(a,b: point): double; begin   result: =sqrt(sqr(b.x-a.x)+sqr(b.y-a.y)) end; function s(a,b,c: point): double; var   p,la,lb,lc: double; begin   la: =l(a,b); lb: =l(b,c); lc: =l(c,a);   if (la+lb> lc) and (la+lc> lb) and (lb+lc> la) then begin       p: =0.5*(la+lb+lc);       result: =sqrt(p*(p-la)*(p-lb)*(p-lc))       end   else       result: =0 end; var   a,b,c,d: point;   s1,s2: double; begin   getpoint('a',a);   getpoint('b',b);   getpoint('c',c);   getpoint('d',d);   s1: =s(a,b,c);   if s1=0 then write('по точкам а,в,с нельзя построить треугольник')   else begin       s2: =s(c,d,a);       if s2=0 then write('по точкам c,d,a нельзя построить треугольник')       else writeln('площадь четырехугольника равна ',s1+s2)   end end. тестовое решение: введите координаты точки a: -5 -7 введите координаты точки b: -2 4 введите координаты точки c: 5 9 введите координаты точки d: 9 -3 площадь четырехугольника равна 123