aboutsummaryrefslogtreecommitdiff
blob: e43a1a408cc7196b10d35f28c149215f057ea9e9 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
program hello;

var
  st : string;

procedure print_hello;
begin
 Writeln('Before assignment'); { set breakpoint 1 here }
 st:='Hello, world!'; 
 writeln(st); {set breakpoint 2 here }
end;

begin
  print_hello;
end.