题目:输入二个十进制数(0-255)。

来源:百度知道 编辑:UC知道 时间:2024/06/01 05:50:19
题目:输入二个十进制数(0-255)。
要求:
(1) 给出提示信息,要求独占一行。
(2) 用二进制数输出其中最大的数。
(3) 如果第一数比第二个数大,则输出yes,否则输出no。
(4) 用十进制输出两数的和。
必须得是汇编

var m,n:0..255;
i,j,k:integer;
a:array[1..1000]of 0..1;
procedure shuzhizhuanhuan(p:0..255,var a:array[1..1000]of 0..1,var o:integer;);
var i:integer;
begin
repeat
inc(i);
a[i]:=p mod 2;
p:=p div 2;
until p=0;
o:=i;
end;
begin
write('n,m='); readln(n,m);
if n>m then shzhzhh(n,a,k)
else shzhzhh(m,a,k);
for i:=k downto 1 do write(a[i]);
if n>m then writeln('Yes!')
else writeln('No!');
writeln(n+m);
end.