/
n-dimens
/
pascalabcnet
Обзор
Документация
Войти
/
n-dimens
/
pascalabcnet
Код
Запросы
0
Задачи
Вики
Пакеты
0
Релизы
0
Аналитика
Безопасность
master
Yield/tests/yieldBugTest5.pas
22 строки
290 B
Oleg Batashov
Yield tree conversion projects added
19 май 2016, 02:14
19 май 2016, 02:14
4050d31
Код
Авторство
О чём код?
function Gen(n: integer): sequence of real; begin begin var x := 2; yield x; begin var y := 666; yield x + z; end; end; begin var x := 3.8; yield x; end; var x := 55; yield x; end; begin var q := Gen(666); q.Println; end.