Среди приведенных ниже трех чисел, записанных в различных системах счисления, найдите максимальное и запишите его в ответе в десятичной системе счисления. 38(16) 75(8) 110100(2)

ответ: 61

38(16)=3*16+8=56

75(8)=7*8+5=61

110100(2)=4+16+32=52

Объяснение:

program bapehbe;

var

    l, b, s : integer;

    o : real;

begin

    writeln (' skolko litrov varenya v tazy? ');

    readln (l);

    writeln (' kakaya emkost banok? ');

    readln (b);

    s: = l div b;

    o: = l mod b;

    writeln (' polnih banok_', s);

    writeln (' litrov ostaloc_', o: 2: 2);

    readln;

end. 

var  s: string;   i: longint; begin  readln(s);   for i: =length(s) downto 1 do  begin  if s[i]=' ' then delete(s,i,1);   if (s[i]> ='1')and(s[i]< ='9') then delete(s,i,1);   end;   writeln(length(s)); end.