fork download

copy

program ideone;
var a,b,c:integer;
begin
read(a,b,c);
if a<b or a=b and b<c or b=c
then
write('YES');
if a>b or b>c
then
write('NO');
 
end.
 

Free Pascal Compiler version 3.0.4+dfsg-22 [2019/01/24] for x86_64
Copyright (c) 1993-2017 by Florian Klaempfl and others
Target OS: Linux for x86-64
Compiling prog.pas
prog.pas(5,5) Error: Incompatible types: got "Boolean" expected "Int64"
prog.pas(8,5) Error: Incompatible types: got "Boolean" expected "Int64"
prog.pas(13,1) Fatal: There were 2 errors compiling module, stopping
Fatal: Compilation aborted
Error: /usr/bin/ppcx64 returned an error exitcode

Standard output is empty