uses System.SysUtils;

//"const" for constants,
//"var" + type name for variables

const
  MaxInt64 = High(UInt64);
  Mb = 1024 * 1024;
  Exp = 2.71828;
  Pi32: Single = 3.14;
  Greeting = 'Hello';
  SunIsStar = True;
  CharA = 'A'; //#65, #$41

var
  Number, OtherNumber: Integer;
  Billion: Double;
  Text: string;
  EarthIsStar: Boolean;

begin
  Number := 42;
  OtherNumber := 37;
  Billion := 1E+9;

  //Multiline string
  Text := 'this is some' + sLineBreak +
    'multiline text';

  EarthIsStar := False;

  WriteLn('number = ', Number);
  WriteLn('otherNumber = ', OtherNumber);
  WriteLn('maxInt64 = ', MaxInt64);
  WriteLn('Mb = ', Mb);
  WriteLn('exp = ', FloatToStr(Exp));
  WriteLn('billion = ', FloatToStr(Billion));
  WriteLn('pi = ', Pi32:0:2);
  WriteLn('greeting = ', Greeting);
  WriteLn('text = ', Text);
  WriteLn('sunIsStar = ', SunIsStar);
  WriteLn('earthIsStar = ', EarthIsStar);
  WriteLn('charA = ', CharA);
end.