/
n-dimens
/
pascalabcnet
Обзор
Документация
Войти
/
n-dimens
/
pascalabcnet
Код
Запросы
0
Задачи
Вики
Пакеты
0
Релизы
0
Аналитика
Безопасность
master
TestSuite/CompilationSamples/delegates12.pas
8 строк
139 B
Бондарев Иван
fix #1407
06 янв 2019, 13:07
06 янв 2019, 13:07
74b2942
Код
Авторство
О чём код?
function f(x: real) := x*2; function g(x: real) := x+1; begin var fg: real -> real := f*g; assert(abs(fg(1)-4) < 0.00000001); end.