ΠΠΎΡΡΠ°ΠΏΠ½ΠΎ Π΅ ΠΈΠ·Π΄Π°Π²Π°ΡΠ΅ΡΠΎ Π½Π° ΠΏΡΠΎΠ³ΡΠ°ΠΌΡΠΊΠΈΠΎΡ ΡΠΈΡΡΠ΅ΠΌ PascalABC.NET 3.8.3, ΠΊΠΎΡ Π½ΡΠ΄ΠΈ ΠΈΠ·Π΄Π°Π½ΠΈΠ΅ Π½Π° ΠΏΡΠΎΠ³ΡΠ°ΠΌΡΠΊΠΈΠΎΡ ΡΠ°Π·ΠΈΠΊ Pascal ΡΠΎ ΠΏΠΎΠ΄Π΄ΡΡΠΊΠ° Π·Π° Π³Π΅Π½Π΅ΡΠΈΡΠ°ΡΠ΅ ΠΊΠΎΠ΄ Π·Π° ΠΏΠ»Π°ΡΡΠΎΡΠΌΠ°ΡΠ° .NET, ΠΌΠΎΠΆΠ½ΠΎΡΡ Π·Π° ΠΊΠΎΡΠΈΡΡΠ΅ΡΠ΅ .NET Π±ΠΈΠ±Π»ΠΈΠΎΡΠ΅ΠΊΠΈ ΠΈ Π΄ΠΎΠΏΠΎΠ»Π½ΠΈΡΠ΅Π»Π½ΠΈ ΡΡΠ½ΠΊΡΠΈΠΈ ΠΊΠ°ΠΊΠΎ Π³Π΅Π½Π΅ΡΠΈΡΠΊΠΈ ΠΊΠ»Π°ΡΠΈ, ΠΈΠ½ΡΠ΅ΡΡΠ΅ΡΡΠΈ, ΠΎΠΏΠ΅ΡΠ°ΡΠΎΡ ΠΏΡΠ΅ΠΎΠΏΡΠΎΠ²Π°ΡΡΠ²Π°ΡΠ΅, Ξ»-ΠΈΠ·ΡΠ°Π·ΠΈ, ΠΈΡΠΊΠ»ΡΡΠΎΡΠΈ, ΡΠΎΠ±ΠΈΡΠ°ΡΠ΅ ΡΡΠ±ΡΠ΅, ΠΌΠ΅ΡΠΎΠ΄ΠΈ Π½Π° ΠΏΡΠΎΡΠΈΡΡΠ²Π°ΡΠ΅, Π½Π΅ΠΈΠΌΠ΅Π½ΡΠ²Π°Π½ΠΈ ΠΊΠ»Π°ΡΠΈ ΠΈ Π°Π²ΡΠΎΠΊΠ»Π°ΡΠΈ. ΠΡΠΎΠ΅ΠΊΡΠΎΡ Π΅ ΠΏΡΠ²Π΅Π½ΡΡΠ²Π΅Π½ΠΎ ΡΠΎΠΊΡΡΠΈΡΠ°Π½ Π½Π° Π°ΠΏΠ»ΠΈΠΊΠ°ΡΠΈΠΈ Π²ΠΎ ΠΎΠ±ΡΠ°Π·ΠΎΠ²Π°Π½ΠΈΠ΅ΡΠΎ ΠΈ ΠΈΡΡΡΠ°ΠΆΡΠ²Π°ΡΠ΅ΡΠΎ. ΠΠ°ΠΊΠ΅ΡΠΎΡ ΠΈΡΡΠΎ ΡΠ°ΠΊΠ° Π²ΠΊΠ»ΡΡΡΠ²Π° ΡΠ°Π·Π²ΠΎΡΠ½Π° ΠΎΠΊΠΎΠ»ΠΈΠ½Π° ΡΠΎ ΡΠΎΠ²Π΅ΡΠΈ Π·Π° ΠΊΠΎΠ΄, Π°Π²ΡΠΎΠΌΠ°ΡΡΠΊΠΎ ΡΠΎΡΠΌΠ°ΡΠΈΡΠ°ΡΠ΅, Π΄Π΅Π±Π°Π³Π΅Ρ, Π΄ΠΈΠ·Π°ΡΠ½Π΅Ρ Π½Π° ΡΠΎΡΠΌΠΈ ΠΈ ΠΏΡΠΈΠΌΠ΅ΡΠΎΡΠΈ Π½Π° ΠΊΠΎΠ΄ Π·Π° ΠΏΠΎΡΠ΅ΡΠ½ΠΈΡΠΈ. ΠΡΠΎΠ΅ΠΊΡΠ½ΠΈΠΎΡ ΠΊΠΎΠ΄ ΡΠ΅ Π΄ΠΈΡΡΡΠΈΠ±ΡΠΈΡΠ° ΠΏΠΎΠ΄ Π»ΠΈΡΠ΅Π½ΡΠ°ΡΠ° LGPLv3. ΠΠΎΠΆΠ΅ Π΄Π° ΡΠ΅ ΠΈΠ·Π³ΡΠ°Π΄ΠΈ Π½Π° Linux (ΠΌΠΎΠ½ΠΎ-Π±Π°Π·ΠΈΡΠ°Π½) ΠΈ Windows.
ΠΡΠΎΠΌΠ΅Π½ΠΈ Π²ΠΎ Π½ΠΎΠ²ΠΎΡΠΎ ΠΈΠ·Π΄Π°Π½ΠΈΠ΅:
- Π¦ΠΈΠΊΠ» Β«forΒ» ΡΠ΅ΠΏΠ΅ΡΡ Π΄ΠΎΠΏΡΡΠΊΠ°Π΅Ρ ΡΠΊΠ°Π·Π°Π½ΠΈΠ΅ ΡΠ°Π³Π° step, Π΅ΡΠ»ΠΈ Π½Π΅ ΠΈΡΠΏΠΎΠ»ΡΠ·ΡΠ΅ΡΡΡ ΠΌΠΎΠ΄ΠΈΡΠΈΠΊΠ°ΡΠΎΡ downto. ΠΡΠ»Π΅Π²ΠΎΠΉ ΡΠ°Π³ Π²ΡΠ·ΡΠ²Π°Π΅Ρ ΠΈΡΠΊΠ»ΡΡΠ΅Π½ΠΈΠ΅ ZeroStepException. begin for var i:=1 to 6 step 2 do Print(i); Println; for var c:=βfβ to βaβ step -2 do Print(c); end.
- Π ΡΠΈΠΊΠ»Π΅ foreach ΡΠ°Π·ΡΠ΅ΡΠ΅Π½ΠΎ ΠΈΡΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°ΡΡ ΠΈΠ½Π΄Π΅ΠΊΡ: begin foreach var x in Arr(1,2,3) index i do Println(i,x); end.
- Π Π±ΠΈΠ±Π»ΠΈΠΎΡΠ΅ΡΠ½ΠΎΠΉ ΡΡΠ½ΠΊΡΠΈΠΈ TypeName ΡΠ΅Π°Π»ΠΈΠ·ΠΎΠ²Π°Π½ ΡΡΠ°Π½Π΄Π°ΡΡΠ½ΡΠΉ ΠΏΠΎΡΠΎΠΊ ErrOutput Π΄Π»Ρ Π²ΡΠ²ΠΎΠ΄Π° ΡΠΈΠ±ΠΎΠΊ: begin var o: (integer,integer)->() := (x,y)->Print(1); Println(TypeName(o)); var o1 := new List<integer>[2,3]; Println(TypeName(o1)); end.
- Π£ΡΡΡΠ°Π½Π΅Π½Π° ΠΎΡΠΈΠ±ΠΊΠ° ΠΏΡΠΈ ΠΏΠ΅ΡΠ΅Π½Π°ΠΏΡΠ°Π²Π»Π΅Π½ΠΈΠΈ Π²Π²ΠΎΠ΄Π°, Π½Π΅ ΠΏΠΎΠ·Π²ΠΎΠ»ΡΠ²ΡΠ°Ρ ΡΠ΅ΡΠ°ΡΡ ΡΠ΅ΡΠ°ΡΡ ΠΈΠ½ΡΠ΅ΡΠ°ΠΊΡΠΈΠ²Π½ΡΠ΅ ΠΎΠ»ΠΈΠΌΠΏΠΈΠ°Π΄Π½ΡΠ΅ Π·Π°Π΄Π°ΡΠΈ.
ΠΠ·Π²ΠΎΡ: opennet.ru