/
n-dimens
/
pascalabcnet
Обзор
Документация
Войти
/
n-dimens
/
pascalabcnet
Код
Запросы
0
Задачи
Вики
Пакеты
0
Релизы
0
Аналитика
Безопасность
master
TestSuite/nested6.pas
19 строк
205 B
Ivan Bondarev
#2699
04 сен 2022, 16:40
04 сен 2022, 16:40
aee9845
Код
Авторство
О чём код?
var i: integer; type t1 = static class static procedure p1; end; static procedure t1.p1; function f(b: byte) := b; begin f(0); i := 1; end; begin t1.p1; assert(i = 1); end.