Advertisement
NLinker

Simple conceptions in Pascal

Nov 25th, 2017
193
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Pascal 0.25 KB | None | 0 0
  1. //fpc 3.0.0
  2.  
  3. program HelloWorld;
  4.  
  5. function f(x: Integer): Integer;
  6. begin
  7.     f := x * 2;
  8. end;
  9.  
  10.  
  11. var abc, bcd: Integer;
  12. begin
  13.     abc := 10;
  14.     readln(bcd);
  15.     writeln('Hello, world!');
  16.     writeln('result is: ', f(abc + bcd));
  17. end.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement