1.pl0

来自「PLO模板程序设计」· PL0 代码 · 共 12 行

PROGRAM P1;
VAR I,MAX:INTEGER; X,Y:INTEGER;
BEGIN
    READ(I,X,Y);
    IF I>X THEN 
        MAX:=I 
    ELSE MAX:=X;
   IF Y>MAX
    THEN MAX:=Y;
  WRITE(MAX);
END.