Có.
vd: if (a < b) then writeln('a < b') else writeln('a > b');
<=>
if (a < b) then writeln('a < b');
if (a > b) then writeln('a > b');