Integer comparison: Difference between revisions
Content added Content deleted
m (→{{header|Wren}}: Changed to Wren S/H) |
(PascalABC.NET) |
||
| Line 3,236: | Line 3,236: | ||
if (a > b) then writeln(a, ' is greater than ', b); |
if (a > b) then writeln(a, ' is greater than ', b); |
||
end.</syntaxhighlight> |
end.</syntaxhighlight> |
||
=={{header|PascalABC.NET}}== |
|||
<syntaxhighlight lang="delphi"> |
|||
begin |
|||
var (a,b) := ReadInteger2('Enter a,b:'); |
|||
if a < b then |
|||
Println($'{a} is less then {b}') |
|||
else if a > b then |
|||
Println($'{a} is greater then {b}') |
|||
else Println($'{a} is equal to then {b}') |
|||
end. |
|||
</syntaxhighlight> |
|||
=={{header|Perl}}== |
=={{header|Perl}}== |
||