/
n-dimens
/
pascalabcnet
Обзор
Документация
Войти
/
n-dimens
/
pascalabcnet
Код
Запросы
0
Задачи
Вики
Пакеты
0
Релизы
0
Аналитика
Безопасность
master
TestSuite/delegates7.pas
18 строк
170 B
Бондарев Иван
delegates7.pas
10 июн 2017, 20:34
10 июн 2017, 20:34
d464de4
Код
Авторство
О чём код?
var a, b: integer; procedure p(); begin a := 1; end; procedure r(); begin b := 2; end; begin var q: procedure := p+r; q; assert(a = 1); assert(b = 2); end.