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