input2

来自「編譯器的虛擬yacc工具」· 代码 · 共 12 行

program test (out);
var max,x: integer;
begin
  max := 44;
  readln(x);
  if x > max then
     x := x - max
  else
     x := max - x;
  writeln(x) 
end.