/
n-dimens
/
pascalabcnet
Обзор
Документация
Войти
/
n-dimens
/
pascalabcnet
Код
Запросы
0
Задачи
Вики
Пакеты
0
Релизы
0
Аналитика
Безопасность
master
TestSuite/delegates22.pas
10 строк
162 B
Ivan Bondarev
#2922
04 ноя 2023, 22:12
04 ноя 2023, 22:12
8bbc009
Код
Авторство
О чём код?
procedure pr1(act: (sequence of integer)-> ()); begin act(Arr(1,2,3)); end; var l: integer; begin pr1(x-> begin l := x.Count end); assert(l = 3); end.