Вычислите 7116 + 4516 .Ответ приведите в двоичной системе.
Вычислите 7116 + 4516 .Ответ приведите в двоичной системе.
Гость
Ответ(ы) на вопрос:
Гостьuses crt;
function dec2bin(x:integer):string;
var s:string;
begin s:='';
while x>0 do
begin
s:=chr(ord('0')+x mod 2)+s;
x:=x div 2;
end;
dec2bin:=s;
end;
var a: integer;
begin clrscr;
a:=7116+4516;
writeln('ответ:',dec2bin(a));
end.
Не нашли ответ?
Похожие вопросы