ΠΠΎΡΡΠ°ΠΏΠ½ΠΎ Π΅ ΠΈΠ·Π΄Π°Π²Π°ΡΠ΅ΡΠΎ Π½Π° ΠΏΡΠΎΠ³ΡΠ°ΠΌΡΠΊΠΈΠΎΡ ΡΠΈΡΡΠ΅ΠΌ PascalABC.NET 3.8, ΠΊΠΎΡ Π½ΡΠ΄ΠΈ ΠΈΠ·Π΄Π°Π½ΠΈΠ΅ Π½Π° ΠΏΡΠΎΠ³ΡΠ°ΠΌΡΠΊΠΈΠΎΡ ΡΠ°Π·ΠΈΠΊ Pascal ΡΠΎ ΠΏΠΎΠ΄Π΄ΡΡΠΊΠ° Π·Π° Π³Π΅Π½Π΅ΡΠΈΡΠ°ΡΠ΅ ΠΊΠΎΠ΄ Π·Π° ΠΏΠ»Π°ΡΡΠΎΡΠΌΠ°ΡΠ° .NET, ΠΌΠΎΠΆΠ½ΠΎΡΡ Π·Π° ΠΊΠΎΡΠΈΡΡΠ΅ΡΠ΅ .NET Π±ΠΈΠ±Π»ΠΈΠΎΡΠ΅ΠΊΠΈ ΠΈ Π΄ΠΎΠΏΠΎΠ»Π½ΠΈΡΠ΅Π»Π½ΠΈ ΡΡΠ½ΠΊΡΠΈΠΈ ΠΊΠ°ΠΊΠΎ Π³Π΅Π½Π΅ΡΠΈΡΠΊΠΈ ΠΊΠ»Π°ΡΠΈ, ΠΈΠ½ΡΠ΅ΡΡΠ΅ΡΡΠΈ, ΠΎΠΏΠ΅ΡΠ°ΡΠΎΡ ΠΏΡΠ΅ΠΎΠΏΡΠΎΠ²Π°ΡΡΠ²Π°ΡΠ΅, Ξ»-ΠΈΠ·ΡΠ°Π·ΠΈ, ΠΈΡΠΊΠ»ΡΡΠΎΡΠΈ, ΡΠΎΠ±ΠΈΡΠ°ΡΠ΅ ΡΡΠ±ΡΠ΅, ΠΌΠ΅ΡΠΎΠ΄ΠΈ Π½Π° ΠΏΡΠΎΡΠΈΡΡΠ²Π°ΡΠ΅, Π½Π΅ΠΈΠΌΠ΅Π½ΡΠ²Π°Π½ΠΈ ΠΊΠ»Π°ΡΠΈ ΠΈ Π°Π²ΡΠΎΠΊΠ»Π°ΡΠΈ. ΠΡΠΎΠ΅ΠΊΡΠΎΡ Π΅ ΠΏΡΠ²Π΅Π½ΡΡΠ²Π΅Π½ΠΎ ΡΠΎΠΊΡΡΠΈΡΠ°Π½ Π½Π° Π°ΠΏΠ»ΠΈΠΊΠ°ΡΠΈΠΈ Π²ΠΎ ΠΎΠ±ΡΠ°Π·ΠΎΠ²Π°Π½ΠΈΠ΅ΡΠΎ ΠΈ ΠΈΡΡΡΠ°ΠΆΡΠ²Π°ΡΠ΅ΡΠΎ. ΠΠ°ΠΊΠ΅ΡΠΎΡ ΠΈΡΡΠΎ ΡΠ°ΠΊΠ° Π²ΠΊΠ»ΡΡΡΠ²Π° ΡΠ°Π·Π²ΠΎΡΠ½Π° ΠΎΠΊΠΎΠ»ΠΈΠ½Π° ΡΠΎ ΡΠΎΠ²Π΅ΡΠΈ Π·Π° ΠΊΠΎΠ΄, Π°Π²ΡΠΎΠΌΠ°ΡΡΠΊΠΎ ΡΠΎΡΠΌΠ°ΡΠΈΡΠ°ΡΠ΅, Π΄Π΅Π±Π°Π³Π΅Ρ, Π΄ΠΈΠ·Π°ΡΠ½Π΅Ρ Π½Π° ΡΠΎΡΠΌΠΈ ΠΈ ΠΏΡΠΈΠΌΠ΅ΡΠΎΡΠΈ Π½Π° ΠΊΠΎΠ΄ Π·Π° ΠΏΠΎΡΠ΅ΡΠ½ΠΈΡΠΈ. ΠΡΠΎΠ΅ΠΊΡΠ½ΠΈΠΎΡ ΠΊΠΎΠ΄ ΡΠ΅ Π΄ΠΈΡΡΡΠΈΠ±ΡΠΈΡΠ° ΠΏΠΎΠ΄ Π»ΠΈΡΠ΅Π½ΡΠ°ΡΠ° LGPLv3. ΠΠΎΠΆΠ΅ Π΄Π° ΡΠ΅ ΠΈΠ·Π³ΡΠ°Π΄ΠΈ Π½Π° Linux (ΠΌΠΎΠ½ΠΎ-Π±Π°Π·ΠΈΡΠ°Π½) ΠΈ Windows.
ΠΡΠΎΠΌΠ΅Π½ΠΈ Π²ΠΎ Π½ΠΎΠ²ΠΎΡΠΎ ΠΈΠ·Π΄Π°Π½ΠΈΠ΅:
- ΠΠΎΠ΄Π°Π΄Π΅Π½Π° Π΅ ΠΏΠΎΠ΄Π΄ΡΡΠΊΠ° Π·Π° ΡΠ΅ΡΠ΅ΡΠ΅ ΠΏΠΎΠ²Π΅ΡΠ΅Π΄ΠΈΠΌΠ΅Π½Π·ΠΈΠΎΠ½Π°Π»Π½ΠΈ Π½ΠΈΠ·ΠΈ ΠΏΠΎΡΠ½ΡΠ²Π°Π°Ρ 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] ΠΊΡΠ°Ρ.
- ΠΠΎΠ΄Π°Π΄Π΅Π½ΠΈ Π»Π°ΠΌΠ±Π΄Π° ΠΈΠ·ΡΠ°Π·ΠΈ ΡΠΎ ΠΏΠ°ΡΠ°ΠΌΠ΅ΡΡΠΈ Π·Π° ΠΎΡΠΏΠ°ΠΊΡΠ²Π°ΡΠ΅ ΠΊΠΎΠΈ ΡΠ΅ ΡΠΎΡΠΊΠΈ ΠΈΠ»ΠΈ ΡΠ΅ΠΊΠ²Π΅Π½ΡΠΈ. Π‘Π΅Π³Π° Π΅ ΠΌΠΎΠΆΠ½ΠΎ Π΄Π° ΡΠ΅ ΠΈΠΌΠ΅Π½ΡΠ²Π°Π°Ρ Π΅Π»Π΅ΠΌΠ΅Π½ΡΠΈ Π½Π° ΡΠΎΡΠΊΠΈ Π΄ΠΈΡΠ΅ΠΊΡΠ½ΠΎ Π²ΠΎ Π»Π°ΠΌΠ±Π΄Π° ΠΏΠ°ΡΠ°ΠΌΠ΅ΡΡΠΈΡΠ΅. ΠΠ° Π΄Π° Π³ΠΎ ΠΎΡΠΏΠ°ΠΊΡΠ²Π°ΡΠ΅ ΠΏΠ°ΡΠ°ΠΌΠ΅ΡΠ°ΡΠΎΡ ΡΠΎ ΡΠΎΡΠ±Π° t Π²ΠΎ ΠΏΡΠΎΠΌΠ΅Π½Π»ΠΈΠ²ΠΈΡΠ΅ x ΠΈ y, ΠΊΠΎΡΠΈΡΡΠ΅ΡΠ΅ ΡΠ° ΠΎΠ·Π½Π°ΠΊΠ°ΡΠ° \\(x,y). ΠΠ²Π° Π΅ Π΅Π΄Π΅Π½ ΠΏΠ°ΡΠ°ΠΌΠ΅ΡΠ°Ρ, Π·Π° ΡΠ°Π·Π»ΠΈΠΊΠ° ΠΎΠ΄ ΠΎΠ·Π½Π°ΠΊΠ°ΡΠ° (x,y), ΠΊΠΎΡΠ° ΠΏΡΠ΅ΡΡΡΠ°Π²ΡΠ²Π° Π΄Π²Π° ΠΏΠ°ΡΠ°ΠΌΠ΅ΡΡΠΈ: begin var s := Seq(('Umnova',16),('Ivanov',23), ('Popova',17), ('ΠΠΎΠ·Π»ΠΎΠ²', 24)); Println('ΠΠΎΠ·ΡΠ°ΡΠ½ΠΈ:'); s.Where(\\(ΠΈΠΌΠ΅, Π²ΠΎΠ·ΡΠ°ΡΡ) -> Π²ΠΎΠ·ΡΠ°ΡΡ >= 18).Println; Println('ΠΠΎΠ΄ΡΠ΅Π΄ΠΈ ΠΏΠΎ ΠΏΡΠ΅Π·ΠΈΠΌΠ΅:'); s.OrderBy(\\(ΠΈΠΌΠ΅, Π²ΠΎΠ·ΡΠ°ΡΡ) -> ΠΈΠΌΠ΅).Println; ΠΊΡΠ°Ρ.
- ΠΠΎΠ·Π²ΠΎΠ»Π΅Π½Π° Π΅ ΠΊΠΎΠ½ΡΡΡΡΠΊΡΠΈΡΠ°ΡΠ° βΠ° ΠΊΠ°ΠΊΠΎ Π½ΠΈΠ·Π° ΠΎΠ΄ Π’β, ΠΊΠΎΡΠ° ΠΏΡΠ΅ΡΡ ΠΎΠ΄Π½ΠΎ Π±Π΅ΡΠ΅ Π·Π°Π±ΡΠ°Π½Π΅ΡΠ° Π½Π° Π³ΡΠ°ΠΌΠ°ΡΠΈΡΠΊΠΎ Π½ΠΈΠ²ΠΎ. start var ob: ΠΎΠ±ΡΠ΅ΠΊΡ := Π½ΠΎΠ² ΡΠ΅Π» Π±ΡΠΎΡ[2,3]; var a := ob ΠΊΠ°ΠΊΠΎ Π½ΠΈΠ·Π° [,] ΠΎΠ΄ ΡΠ΅Π» Π±ΡΠΎΡ; ΠΊΡΠ°Ρ.
ΠΠ·Π²ΠΎΡ: opennet.ru