Commit | Line | Data |
---|---|---|
a912286e DJ |
1 | program hello; |
2 | ||
3 | var | |
4 | st : string; | |
5 | ||
6 | procedure print_hello; | |
7 | begin | |
8 | Writeln('Before assignment'); { set breakpoint 1 here } | |
9 | st:='Hello, world!'; | |
10 | writeln(st); {set breakpoint 2 here } | |
11 | end; | |
12 | ||
13 | begin | |
14 | print_hello; | |
15 | end. |