PascalABC.NET 3.8 āĻĒā§āĻ°ā§āĻā§āĻ°āĻžāĻŽāĻŋāĻ āĻ¸āĻŋāĻ¸ā§āĻā§āĻŽā§āĻ° āĻ°āĻŋāĻ˛āĻŋāĻ āĻĒāĻžāĻāĻ¯āĻŧāĻž āĻ¯āĻžāĻā§āĻā§, āĻ¯āĻž .NET āĻĒā§āĻ˛ā§āĻ¯āĻžāĻāĻĢāĻ°ā§āĻŽā§āĻ° āĻāĻ¨ā§āĻ¯ āĻā§āĻĄ āĻā§āĻ¨āĻžāĻ°ā§āĻļāĻ¨ā§āĻ° āĻāĻ¨ā§āĻ¯ āĻ¸āĻŽāĻ°ā§āĻĨāĻ¨ āĻ¸āĻš Pascal āĻĒā§āĻ°ā§āĻā§āĻ°āĻžāĻŽāĻŋāĻ āĻāĻžāĻˇāĻžāĻ° āĻāĻāĻāĻŋ āĻ¸āĻāĻ¸ā§āĻāĻ°āĻŖ āĻ āĻĢāĻžāĻ° āĻāĻ°ā§, .NET āĻ˛āĻžāĻāĻŦā§āĻ°ā§āĻ°āĻŋ āĻŦā§āĻ¯āĻŦāĻšāĻžāĻ° āĻāĻ°āĻžāĻ° āĻā§āĻˇāĻŽāĻ¤āĻž āĻāĻŦāĻ āĻ āĻ¤āĻŋāĻ°āĻŋāĻā§āĻ¤ āĻŦā§āĻļāĻŋāĻˇā§āĻā§āĻ¯ āĻ¯ā§āĻŽāĻ¨ āĻā§āĻ¨ā§āĻ°āĻŋāĻ āĻā§āĻ˛āĻžāĻ¸, āĻāĻ¨ā§āĻāĻžāĻ°āĻĢā§āĻ¸, āĻ āĻĒāĻžāĻ°ā§āĻāĻ° āĻāĻāĻžāĻ°āĻ˛ā§āĻĄāĻŋāĻ, Îģ-āĻāĻā§āĻ¸āĻĒā§āĻ°ā§āĻļāĻ¨, āĻŦā§āĻ¯āĻ¤āĻŋāĻā§āĻ°āĻŽ, āĻāĻŦāĻ°ā§āĻāĻ¨āĻž āĻ¸āĻāĻā§āĻ°āĻš, āĻāĻā§āĻ¸āĻā§āĻ¨āĻļāĻ¨ āĻĒāĻĻā§āĻ§āĻ¤āĻŋ, āĻ¨āĻžāĻŽāĻšā§āĻ¨ āĻā§āĻ˛āĻžāĻ¸ āĻāĻŦāĻ āĻ āĻā§āĻā§āĻ˛āĻžāĻ¸āĨ¤ āĻĒā§āĻ°āĻāĻ˛ā§āĻĒāĻāĻŋ āĻĒā§āĻ°āĻžāĻĨāĻŽāĻŋāĻāĻāĻžāĻŦā§ āĻļāĻŋāĻā§āĻˇāĻž āĻāĻŦāĻ āĻāĻŦā§āĻˇāĻŖāĻžāĻ¯āĻŧ āĻ ā§āĻ¯āĻžāĻĒā§āĻ˛āĻŋāĻā§āĻļāĻ¨ā§āĻ° āĻāĻĒāĻ° āĻĻā§āĻˇā§āĻāĻŋ āĻ¨āĻŋāĻŦāĻĻā§āĻ§ āĻāĻ°ā§āĨ¤ āĻĒā§āĻ¯āĻžāĻā§āĻāĻāĻŋāĻ¤ā§ āĻā§āĻĄ āĻāĻā§āĻāĻŋāĻ¤, āĻ¸ā§āĻŦāĻ¯āĻŧāĻāĻā§āĻ°āĻŋāĻ¯āĻŧ-āĻĢāĻ°āĻŽā§āĻ¯āĻžāĻāĻŋāĻ, āĻāĻāĻāĻŋ āĻĄāĻŋāĻŦāĻžāĻāĻžāĻ°, āĻāĻāĻāĻŋ āĻĢāĻ°ā§āĻŽ āĻĄāĻŋāĻāĻžāĻāĻ¨āĻžāĻ° āĻāĻŦāĻ āĻ¨āĻ¤ā§āĻ¨āĻĻā§āĻ° āĻāĻ¨ā§āĻ¯ āĻā§āĻĄ āĻ¨āĻŽā§āĻ¨āĻž āĻ¸āĻš āĻāĻāĻāĻŋ āĻāĻ¨ā§āĻ¨āĻ¯āĻŧāĻ¨ āĻĒāĻ°āĻŋāĻŦā§āĻļ āĻ āĻ¨ā§āĻ¤āĻ°ā§āĻā§āĻā§āĻ¤ āĻ°āĻ¯āĻŧā§āĻā§āĨ¤ āĻĒā§āĻ°āĻāĻ˛ā§āĻĒ āĻā§āĻĄ LGPLv3 āĻ˛āĻžāĻāĻ¸ā§āĻ¨ā§āĻ¸ā§āĻ° āĻ āĻ§ā§āĻ¨ā§ āĻŦāĻŋāĻ¤āĻ°āĻŖ āĻāĻ°āĻž āĻšāĻ¯āĻŧāĨ¤ āĻ˛āĻŋāĻ¨āĻžāĻā§āĻ¸ (āĻŽāĻ¨ā§-āĻāĻŋāĻ¤ā§āĻ¤āĻŋāĻ) āĻāĻŦāĻ āĻāĻāĻ¨ā§āĻĄā§āĻā§ āĻ¤ā§āĻ°āĻŋ āĻāĻ°āĻž āĻ¯ā§āĻ¤ā§ āĻĒāĻžāĻ°ā§āĨ¤
āĻ¨āĻ¤ā§āĻ¨ āĻ°āĻŋāĻ˛āĻŋāĻā§ āĻĒāĻ°āĻŋāĻŦāĻ°ā§āĻ¤āĻ¨:
- āĻŽāĻžāĻ˛ā§āĻāĻŋāĻĄāĻžāĻāĻŽā§āĻ¨āĻļāĻ¨āĻžāĻ˛ āĻ ā§āĻ¯āĻžāĻ°ā§ āĻļā§āĻ°ā§ var m := MatrByRow(||1,2,3,4|,|5,6,7,8|,|9,10,11,12||); Println(m[:,:]); // [[1,2,3,4],[5,6,7,8],[9,10,11,12]] Println(m[::1,::1]); // [[1,2,3,4],[5,6,7,8],[9,10,11,12]] Println(m[1:3,1:4]); // [[6,7,8],[10,11,12]] Println(m[::2,::3]); // [[1,4],[9,12]] Println(m[::-2,::-1]); // [[12,11,10,9],[4,3,2,1]] Println(m[^2::-1,^2::-1]); // [[7,6,5],[3,2,1]] Println(m[:^1,:^1]); // [[1,2,3],[5,6,7]] Println(m[1,:]); // [5,6,7,8] Println(m[^1,:]); // [9,10,11,12] Println(m[:,^1]); // [4,8,12] āĻļā§āĻˇāĨ¤
- āĻāĻŋāĻĒāĻ˛ āĻŦāĻž āĻ¸āĻŋāĻā§āĻ¯āĻŧā§āĻ¨ā§āĻ¸ āĻāĻ¨āĻĒā§āĻ¯āĻžāĻāĻŋāĻ āĻĒā§āĻ¯āĻžāĻ°āĻžāĻŽāĻŋāĻāĻžāĻ° āĻ¸āĻš āĻ˛ā§āĻ¯āĻžāĻŽā§āĻŦāĻĄāĻž āĻāĻā§āĻ¸āĻĒā§āĻ°ā§āĻļāĻ¨ āĻ¯ā§āĻ āĻāĻ°āĻž āĻšāĻ¯āĻŧā§āĻā§āĨ¤ āĻāĻāĻ¨ āĻ˛ā§āĻ¯āĻžāĻŽā§āĻŦāĻĄāĻž āĻĒā§āĻ¯āĻžāĻ°āĻžāĻŽāĻŋāĻāĻžāĻ°ā§ āĻāĻŋāĻĒāĻ˛ā§āĻ° āĻāĻĒāĻžāĻĻāĻžāĻ¨ā§āĻ° āĻ¨āĻžāĻŽ āĻĻā§āĻāĻ¯āĻŧāĻž āĻ¸āĻŽā§āĻāĻŦāĨ¤ x āĻāĻŦāĻ y āĻā§āĻ°āĻŋāĻ¯āĻŧā§āĻŦāĻ˛ā§ āĻāĻāĻāĻŋ āĻāĻŋāĻĒāĻ˛ āĻĒā§āĻ¯āĻžāĻ°āĻžāĻŽāĻŋāĻāĻžāĻ° t āĻāĻ¨āĻĒā§āĻ¯āĻžāĻ āĻāĻ°āĻ¤ā§, āĻ¸ā§āĻŦāĻ°āĻ˛āĻŋāĻĒāĻŋ \\(x,y) āĻŦā§āĻ¯āĻŦāĻšāĻžāĻ° āĻāĻ°ā§āĻ¨āĨ¤ āĻāĻāĻŋ āĻāĻāĻāĻŋ āĻĒā§āĻ¯āĻžāĻ°āĻžāĻŽāĻŋāĻāĻžāĻ°, āĻ¸ā§āĻŦāĻ°āĻ˛āĻŋāĻĒāĻŋ (x,y) āĻāĻ° āĻŦāĻŋāĻĒāĻ°ā§āĻ¤ā§, āĻ¯āĻž āĻĻā§āĻāĻŋ āĻĒāĻ°āĻžāĻŽāĻŋāĻ¤āĻŋ āĻĒā§āĻ°āĻ¤āĻŋāĻ¨āĻŋāĻ§āĻŋāĻ¤ā§āĻŦ āĻāĻ°ā§: start var s := Seq(('Umnova',16),('Ivanov',23), ('Popova',17) ),('āĻā§āĻāĻ˛āĻ', 24)); Println('āĻĒā§āĻ°āĻžāĻĒā§āĻ¤āĻŦāĻ¯āĻŧāĻ¸ā§āĻ:'); s. āĻā§āĻĨāĻžāĻ¯āĻŧ(\\(āĻ¨āĻžāĻŽ, āĻŦāĻ¯āĻŧāĻ¸) -> āĻŦāĻ¯āĻŧāĻ¸ >= 18) āĻĒā§āĻ°āĻŋāĻ¨ā§āĻ; Println('āĻļā§āĻˇ āĻ¨āĻžāĻŽ āĻ āĻ¨ā§āĻ¸āĻžāĻ°ā§ āĻ¸āĻžāĻāĻžāĻ¨:'); s.OrderBy(\\(āĻ¨āĻžāĻŽ, āĻŦāĻ¯āĻŧāĻ¸) -> āĻ¨āĻžāĻŽ)āĨ¤āĻŽā§āĻĻā§āĻ°āĻŖ; āĻļā§āĻˇ.
- āĻ¨āĻŋāĻ°ā§āĻŽāĻžāĻŖ "T āĻāĻ° āĻ ā§āĻ¯āĻžāĻ°ā§ āĻšāĻŋāĻ¸āĻžāĻŦā§" āĻ āĻ¨ā§āĻŽā§āĻĻāĻŋāĻ¤, āĻ¯āĻž āĻāĻā§ āĻŦā§āĻ¯āĻžāĻāĻ°āĻŖ āĻ¸ā§āĻ¤āĻ°ā§ āĻ¨āĻŋāĻˇāĻŋāĻĻā§āĻ§ āĻāĻŋāĻ˛ā§ˇ āĻļā§āĻ°ā§ var ob: āĻ āĻŦāĻā§āĻā§āĻ := āĻ¨āĻ¤ā§āĻ¨ āĻĒā§āĻ°ā§āĻŖāĻ¸āĻāĻā§āĻ¯āĻž[2,3]; var a := āĻĒā§āĻ°ā§āĻŖāĻ¸āĻāĻā§āĻ¯āĻžāĻ° āĻ ā§āĻ¯āĻžāĻ°ā§ [,] āĻšāĻŋāĻ¸āĻžāĻŦā§ ob; āĻļā§āĻˇ.
āĻāĻ¤ā§āĻ¸: opennet.ru