Integer list example in Free Pascal

program project1;

uses fgl, fphttpclient, fpopenssl, SysUtils;
Type
  TIntegerList = specialize TFPGList<Integer>;
Var
  S : String;
  IntList: TIntegerList;
  i: integer;

begin
   IntList := TIntegerList.Create;
   IntList.Add(5);
   IntList.Add(10);
   IntList.Add(111);

   for  i:=0 to IntList.count-1 do writeln(IntList[i]);


  // s := TFPCustomHTTPClient.SimpleGet('https://www.google.com');
  //Writeln('Got : ',S);
  write('Press Enter to close...');
  Readln;
end.