У чому полягає особливість пошуку першого елемента лінійної таблиці,який відповілає заданій умові

PascalABC.NET 3.4.0, сборка 1671 от 31.05.2018
Внимание! Если программа не работает, обновите версию!

№1

begin
  var (a,b):=ReadInteger2('Введите a,b:');
  if a.IsEven then a-=1;
  Range(a,b,-2).Println
end.

Пример
Введите a,b: 18 4
17 15 13 11 9 7 5

№2

begin
  var (a,b):=ReadInteger2('Введите a,b:');
  Range(b,a).Aggregate(BigInteger(1),(i,j)->i*j).Println
end.

Пример
Введите a,b: 50 7
42241796113490802838350844675089956728302279956889600000000000

№3

begin
  var n:=ReadInteger('n=');
  for var i:=1 to n do
    (1.To(i)).Println('')
end.

Пример
n= 7
1
12
123
1234
12345
123456
1234567

using System;

using System.Drawing;

namespace App

{

   class Triangle

   {

       public Point A { get; }

       public Point B { get; }

       public Point C { get; }

       public Triangle(int x1, int y1, int x2, int y2, int x3, int y3)

       {

           A = new Point(x1, y1);

           B = new Point(x2, y2);

           C = new Point(x3, y3);

       }

       public override string ToString() => $"A({A.X},{A.Y}); B({B.X},{B.Y}); C({C.X},{C.Y})";

   }

   class Program

   {

       static void Main(string[] args)

       {

           Triangle triangle = new Triangle(0, 0, 1, 2, 3, 2); // x1,y1,x2,y2,x3,y3  

           Console.WriteLine(triangle.ToString()); // Вывод: A(0,0); B(1,2); C(3,2)

       }

   }

}

Объяснение: