ืฉื—ืจื•ืจ ืกื‘ื™ื‘ืช ื”ืคื™ืชื•ื— PascalABC.NET 3.8

ื”ื’ืจืกื” ืฉืœ ืžืขืจื›ืช ื”ืชื›ื ื•ืช PascalABC.NET 3.8 ื–ืžื™ื ื”, ื”ืžืฆื™ืขื” ืžื”ื“ื•ืจื” ืฉืœ ืฉืคืช ื”ืชื›ื ื•ืช Pascal ืขื ืชืžื™ื›ื” ื‘ื”ืคืงืช ืงื•ื“ ืขื‘ื•ืจ ืคืœื˜ืคื•ืจืžืช NET, ื™ื›ื•ืœืช ืœื”ืฉืชืžืฉ ื‘ืกืคืจื™ื•ืช NET ื•ืชื›ื•ื ื•ืช ื ื•ืกืคื•ืช ื›ื’ื•ืŸ ืžื—ืœืงื•ืช ื’ื ืจื™ื•ืช, ืžืžืฉืงื™ื , ืขื•ืžืก ื™ืชืจ ืฉืœ ืžืคืขื™ืœื™ื, ื‘ื™ื˜ื•ื™ื™ ฮป, ื—ืจื™ื’ื™ื, ืื™ืกื•ืฃ ืืฉืคื”, ืฉื™ื˜ื•ืช ื”ืจื—ื‘ื”, ืžื—ืœืงื•ืช ื—ืกืจื•ืช ืฉื ื•ืžื—ืœืงื•ืช ืื•ื˜ื•ืžื˜ื™ื•ืช. ื”ืคืจื•ื™ืงื˜ ืžืชืžืงื“ ื‘ืขื™ืงืจ ื‘ื™ื™ืฉื•ืžื™ื ื‘ื—ื™ื ื•ืš ื•ื‘ืžื—ืงืจ ืžื“ืขื™. ื”ื—ื‘ื™ืœื” ื›ื•ืœืœืช ื’ื ืกื‘ื™ื‘ืช ืคื™ืชื•ื— ืขื ืจืžื–ื™ื ืœืงื•ื“, ืขื™ืฆื•ื‘ ืื•ื˜ื•ืžื˜ื™, ื‘ืื’ื™ื, ืžืขืฆื‘ ื˜ืคืกื™ื ื•ื“ื•ื’ืžืื•ืช ืงื•ื“ ืœืžืชื—ื™ืœื™ื. ืงื•ื“ ื”ืคืจื•ื™ืงื˜ ืžื•ืคืฅ ืชื—ืช ืจื™ืฉื™ื•ืŸ LGPLv3. ื ื™ืชืŸ ืœื‘ื ื•ืช ืขืœ ืœื™ื ื•ืงืก (ืžื‘ื•ืกืก ืžื•ื ื•) ื•-Windows.

ืฉื™ื ื•ื™ื™ื ื‘ืžื”ื“ื•ืจื” ื”ื—ื“ืฉื”:

  • ะ”ะพะฑะฐะฒะปะตะฝะฐ ะฟะพะดะดะตั€ะถะบะฐ ัั€ะตะทะพะฒ ะผะฝะพะณะพะผะตั€ะฝั‹ั… ะผะฐััะธะฒะพะฒ begin 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] end.
  • ะ”ะพะฑะฐะฒะปะตะฝั‹ ะปัะผะฑะดะฐ-ะฒั‹ั€ะฐะถะตะฝะธั ั ั€ะฐัะฟะฐะบะพะฒะบะพะน ะฟะฐั€ะฐะผะตั‚ั€ะพะฒ, ัะฒะปััŽั‰ะธั…ัั ะบะพั€ั‚ะตะถะฐะผะธ ะธะปะธ ะฟะพัะปะตะดะพะฒะฐั‚ะตะปัŒะฝะพัั‚ัะผะธ. ะŸะพัะฒะธะปะฐััŒ ะฒะพะทะผะพะถะฝะพัั‚ัŒ ะดะฐะฒะฐั‚ัŒ ะธะผะตะฝะฐ ัะปะตะผะตะฝั‚ะฐะผ ะบะพั€ั‚ะตะถะตะน ะฟั€ัะผะพ ะฒ ะฟะฐั€ะฐะผะตั‚ั€ะฐั… ะปัะผะฑะดั‹. ะงั‚ะพะฑั‹ ั€ะฐัะฟะฐะบะพะฒะฐั‚ัŒ ะฟะฐั€ะฐะผะตั‚ั€-ะบะพั€ั‚ะตะถ t ะฒ ะฟะตั€ะตะผะตะฝะฝั‹ะต x ะธ y, ะธัะฟะพะปัŒะทัƒะตั‚ัั ะทะฐะฟะธััŒ \\(x,y). ะญั‚ะพ ะพะดะธะฝ ะฟะฐั€ะฐะผะตั‚ั€ ะฒ ะพั‚ะปะธั‡ะธะต ะพั‚ ะทะฐะฟะธัะธ (x,y), ะฟั€ะตะดัั‚ะฐะฒะปััŽั‰ะตะน ะดะฒะฐ ะฟะฐั€ะฐะผะตั‚ั€ะฐ: begin var s := Seq((โ€˜ะฃะผะฝะพะฒะฐโ€™,16),(โ€˜ะ˜ะฒะฐะฝะพะฒโ€™,23), (โ€˜ะŸะพะฟะพะฒะฐโ€™,17),(โ€˜ะšะพะทะปะพะฒโ€™,24)); Println(โ€˜ะกะพะฒะตั€ัˆะตะฝะฝะพะปะตั‚ะฝะธะต:โ€™); s.Where(\\(name,age) -> age >= 18).Println; Println(โ€˜ะกะพั€ั‚ะธั€ะพะฒะบะฐ ะฟะพ ั„ะฐะผะธะปะธะธ:โ€™); s.OrderBy(\\(name,age) -> name).Println; end.
  • ะ ะฐะทั€ะตัˆะตะฝะฐ ะบะพะฝัั‚ั€ัƒะบั†ะธั ยซa as array of Tยป, ะบะพั‚ะพั€ะฐั ั€ะฐะฝะตะต ะฑั‹ะปะฐ ะทะฐะฟั€ะตั‰ะตะฝะฐ ะฝะฐ ัƒั€ะพะฒะฝะต ะณั€ะฐะผะผะฐั‚ะธะบะธ. begin var ob: object := new integer[2,3]; var a := ob as array [,] of integer; end.

ืžืงื•ืจ: OpenNet.ru

ื”ื•ืกืคืช ืชื’ื•ื‘ื”