PascalABC.NET + .NET 10: FrozenDictionary Продолжаем знакомиться с возможностями современного .NET. FrozenDictionary<TKey,TValue> — специальный словарь для сценария: создали один раз → читаем очень много раз. uses System.Collections.Frozen; begin var d := Dict( 'one' to 1, 'two' to 2, 'three' to 3 ); var fd := FrozenDictionary.ToFrozenDictionary(d); Println(fd['two']); end. После создания FrozenDi…

🔹 PascalABC.NET + .NET 10: очередь с приоритетами Продолжаем знакомиться с возможностями современного .NET, которые становятся доступны в PascalABC.NET после перехода на .NET 10. Сегодня — PriorityQueue<TElement,TPriority> из System.Collections.Generic. Обычная очередь работает по принципу «первым пришёл — первым вышел». В очереди с приоритетами порядок определяется не временем добавления, а приор…

.NET 10 в PascalABC.NET: Span<T> Переход PascalABC.NET на .NET 10 открывает доступ ко многим современным возможностям платформы. Начинаем показывать их на небольших примерах. Одна из них — Span<T>: тип для эффективной работы с непрерывным участком памяти без копирования данных. begin var a := [10,20,30,40,50]; var s := new System.Span<integer>(a,1,3); s[1] := 333; a.Println end. Результат: 10 20 3…

Трехмерная движущаяся 3D-сцена По мотивам https://habr.com/ru/articles/815653/?ysclid=mufywzozbj234491077 Ну не 256 байт а 860 ## uses GraphABC; SetWindowSize(396,240); LockDrawing; var t := 9.0; repeat t += 1; for var i := 5999 downto 0 do begin var a := i mod 99/50-1; var s := 1-i/4000; var b := s; var x := t; var y := 1.0; var z := 1; var d := 1.0; while z<99 do begin z += 1; var h := 0; if (z>…

Спаниели или бульдоги? 🐶 Поговорим о машинном обучении в PascalABC.NET и о том, почему это круто. Возьмём простую учебную задачу. У нас есть вес и высота собак двух пород. Обучим логистическую регрессию и посмотрим, как она разделит бульдогов и спаниелей. uses MLABC, PlotML; begin var df := DataFrame.FromCsv('dogs.csv'); var X := df.ToMatrix(['Вес', 'ВысотаВХолке']); var target := df.EncodeTarget(…