fork download
  1. program name;
  2. var N,M,L,a,u,i:integer;
  3. begin
  4. read (N,M,L);
  5. a:=L+M-N;
  6. u:=M-a;
  7. i:=L-a;
  8. write(a,u,i);
  9. end.
Success #stdin #stdout 0s 288KB
stdin
1 2 3 4
stdout
4-2-1