Advertisement
MoonDeMon

SCJ1 No 1

Jan 4th, 2017
77
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.22 KB | None | 0 0
  1. program tukerangka;
  2. uses crt;
  3. var a,b,c:integer;
  4. begin
  5. clrscr;
  6. read(a);
  7. read(b);
  8. c:=a;
  9. a:=b;
  10. b:=c;
  11. writeln(a);
  12. writeln(b);
  13. readkey;
  14. end.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement