pascal 0.1.4

A modern Pascal compiler with build/intepreter/package manager built with Rust
Documentation 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41

program FormatterDemo;
uses
  SysUtils,
  Classes;

var
  i: Integer;
  message: String;
  numbers: array[1..10] of Integer;

procedure PrintMessage(msg: String);
begin
  writeln(msg);
end;

function Add(a, b: Integer): Integer;
begin
  Result := a + b;
end;

begin
  message := 'Hello from Pascal formatter!';
  PrintMessage(message);
  
  for i := 1 to 10 do
  begin
    numbers[i] := i * 2;
    writeln(numbers[i]);
  end;
  
  if Add(5, 3) > 7 then
    writeln('Calculation is correct')
  else
    writeln('Calculation is wrong');
    
  while i > 0 do
  begin
    i := i - 1;
    writeln('Countdown: ', i);
  end;
end.