Lois

Зарегистрирован: 28.06.2011 Сообщения: 253
|
Добавлено: Чт Май 17, 2018 18:27 Заголовок сообщения: Реальный код ( не мой ) |
|
|
[start]
inc _S = 0000000000000000000! \\ *1
inc _S = 0000000000000000000!
inc _S = 0000000000000000000!
inc _S = 0000000000000000000!
main {
brain (
.m = rnd*4; \\ *2
.b = rnd*4;
.c = rnd*4;
var m <> b >< c;
.com return;
)
future (
var brain (i) == _% n;
var .mbc return else n <> pi;
)
doing (
future (return) ==> brain (m);
var %0~ n \ return;
)
var array a (
i+1 == return result;
)
universarum (
var .result else a <> n|pi &_
sum a == d n*pi +i &_
return == %0~ normal;
To var .error return 0;
else var error to goto start;
if to end;
)
}
[end] |
|