Дано а = a716, b = 2518. найдите сумму a + b. ответ укажите в двоичной системе.

пе­ре­ве­дем числа в де­ся­тич­ную си­сте­му счис­ле­ния, вы­пол­ним сло­же­ние, и пе­ре­ве­дем сумму в дво­ич­ную си­сте­му счис­ле­ния:

a716  = 10⋅16 + 7 = 16710.

2518  = 2⋅82  + 5⋅8 + 1 = 16910.

33610  = 1⋅28  + 1⋅26  + 1⋅24  = 1010100002.

varslovo,simval: string; i,k: integer; begink: =0; write('vvedite slovo '); readln(slovo); write('vvedite simval '); readln(simval); for i: =1 to length(slovo) dobeginif slovo[i]=simval then k: =k+1; if slovo[i]=simval then writeln(i,' '); end; if k> =1 thenwriteln('yes vstre4aets9 ',k,' raz, na pozicii ',i)else writeln('no'); writeln; end.вот в одном решении

я бы сделал

program p_1; var a,b: real; beginwriteln ('vvedite 1-oe'); read (a); writeln ('vvedite 2-oe'); read (b); if (a> b) thenbegin writeln ( ' 1-oe bolshe (',a,')' ); end; if (a< b) thenbegin writeln ( ' 1-oe menshee. bolshe vtoroe (',b,')' ); end; if a=b thenbegin writeln ('oni ravni'); end; end.