/
n-dimens
/
pascalabcnet
Обзор
Документация
Войти
/
n-dimens
/
pascalabcnet
Код
Запросы
0
Задачи
Вики
Пакеты
0
Релизы
0
Аналитика
Безопасность
master
TestSuite/CompilationSamples/Data.pas
18 строк
471 B
Бондарев Иван
bug fix #739
17 апр 2018, 22:48
17 апр 2018, 22:48
f3299e0
Код
Авторство
О чём код?
unit Data; //обязательно params procedure p2(params o: array of Exception) := exit;//не обязательно короткая процедура procedure p1 :=//не обязательно короткая процедура try if true then p2(nil); except //обязательно on do и использование переменной исключения в процедуре с params on e: Exception do p2(e); end; end.