13 lines
325 B
Text
13 lines
325 B
Text
begin
|
|
|
|
integer a, b;
|
|
outstring(1,"First number : ");
|
|
ininteger(0, a);
|
|
outstring(1,"Second number: ");
|
|
ininteger(0,b);
|
|
|
|
if a = b then outstring(1,"The two numbers are equal");
|
|
if a < b then outstring(1,"The first number is less than the second");
|
|
if a > b then outstring(1,"The first number is greater than the second");
|
|
|
|
end
|