Блок схему var a,b: integer; begin writeln('введите в одной строке два целых числа и нажмите '); readln(a,b); if a> b then writeln(a,' > ',b) else if a end.

Если я правильно понял ,что нужно.

var 
 a,b:integer;
begin
 readln(a,b);
 if (a>b) then writeln(a,' > ',b)
   else
    if (a<b) then writeln(a,' < ',b)
     else
       writeln(a,' = ',b);
end.