Временно удалил примеры из несуществующей Whats New

3.10.4

InstallerSamples/WhatsNew/3_10_4/InRange.pas

@@ -1,12 +0,0 @@
-begin
-  // Поведение изменено!! Теперь диапазон [6,2] считается пустым
-  5.InRange(6,2).Println; 
-
-  // Универсальная InRange. Должен поддерживаться интерфейс IEnumerable<T>
-  InRange(5,2,6).Println;
-
-  var dt1 := DateTime.Create(2025,04,16);
-  var dt2 := DateTime.Create(2025,04,29);
-  var dt3 := DateTime.Now;
-  InRange(dt2,dt1,dt3).Println; 
-end.

InstallerSamples/WhatsNew/3_10_4/IsOrdered1.pas

@@ -1,23 +0,0 @@
-type
-  Player = auto class
-    Name: string; Points: integer;
-  end;  
-
-function GetPlayers := [
-  new Player('Alice', 120),
-  new Player('Bob', 95),
-  new Player('Charlie', 130),
-  new Player('Diana', 110)
-];
-
-begin
-  var leaderboard := GetPlayers;
-  Println(leaderboard);
-  if not leaderboard.IsOrderedByDescending(p -> p.Points) then
-    Println('Рейтинг составлен неверно!');
-
-  leaderboard := leaderboard.OrderByDescending(p -> p.Points).ToArray;
-  Println(leaderboard);
-  if leaderboard.IsOrderedByDescending(p -> p.Points) then
-    Println('Теперь рейтинг составлен верно!');
-end.

InstallerSamples/WhatsNew/3_10_4/exit_param1.pas

@@ -1,8 +0,0 @@
-function fff: integer;
-begin
-  exit(3)
-end;
-
-begin
-  Print(fff());
-end.

InstallerSamples/WhatsNew/3_10_4/exit_param2.pas

@@ -1,13 +0,0 @@
-function IsPrime(n: integer): boolean;
-begin
-  if n < 2 then exit(False);
-  for var i:=2 to n.Sqrt.Trunc do
-    if n.Divs(i) then
-      exit(False);
-  exit(True);
-end;
-
-begin
-  IsPrime(17).Print;
-  IsPrime(1).Print;
-end.

InstallerSamples/WhatsNew/3_10_4/exit_param3.pas

@@ -1,12 +0,0 @@
-begin
-  var IsPrime: integer → boolean := n → begin
-    if n < 2 then exit(False);
-    for var i:=2 to n.Sqrt.Trunc do
-    if n.Divs(i) then
-      exit(False);
-    exit(True);
-  end;
-  
-  IsPrime(17).Print;
-  IsPrime(1).Print;
-end.

InstallerSamples/WhatsNew/3_10_4/exit_param4.pas

@@ -1,15 +0,0 @@
-function FastPower(a: real; n: integer): real;
-begin
-  if n = 0 then exit(1); // a^0 = 1
-  if n = 1 then exit(a); // a^1 = a
-  if n < 0 then exit(1 / FastPower(a, -n)); // отрицательная степень
-  
-  var half := FastPower(a, n div 2);
-  if n mod 2 = 0 then exit(half * half); // чётная степень
-  exit(half * half * a); // нечётная
-end;
-
-begin
-  Writeln('2^10 = ', FastPower(2, 10)); // 1024
-  Writeln('3^-2 = ', FastPower(3, -2)); // 0.111...
-end.