Сравнение 2х чисел

Посмотреть архив целиком
program sravnenie;

{$APPTYPE CONSOLE}

uses
SysUtils;
var a,b:integer;
begin
writeln('Vvedite 2 zeilx chisla');
readln(a,b);
if a>b then writeln (a,'>',b)
else writeln (a,'<',b);
readln;
end.





Чтобы не видеть здесь видео-рекламу достаточно стать зарегистрированным пользователем.
Чтобы не видеть никакую рекламу на сайте, нужно стать VIP-пользователем.
Это можно сделать совершенно бесплатно. Читайте подробности тут.