fork download
  1. program ideone;
  2. var
  3. j:integer;
  4. begin
  5. readln(j);
  6. writeln('The next number for the number ',j,' is ',j+1,'.');
  7. writeln('The previous number for the number ',j,' is ',j-1,'.');
  8. (* your code goes here *)
  9. end.
Success #stdin #stdout 0s 4564KB
stdin
179
stdout
The next number for the number 179 is 180.
The previous number for the number 179 is 178.