私はスキームに不慣れで、Cのコードが次のようになるネストされたループを作成しようとしています:-
for(i = -1, a = 0; i > -5, a < 5; i--, a++)
{
for(j = i, b = 0; j < (abs(i)), b < 5; j++, b++)
{
<do something>
}
}
私はこのコンセプトでスキームで同様のことを試みました:-
(let oloop( (i -1) (a 0))
(display i)(display a) (newline)
(if (and (> i -5) (< a 5)) (oloop((- i 1) (+ a 1))))))
4 つのループすべてをネストできず、上記のコードが機能しません。
提案してください。