Power-Programmierung/CD1.mdf/magazine/drdobbs/1991/09/bob/test.bob

Text File | 1990-08-15 | 173b | 15 lines

main()
{
    test(5);
    test(12);
}

test(n; i)
{
    for (i = 0; i <= n; ++i) {
    if (i % 2 == 0) continue;
    if (i > 10) break;
    print("i=",i,"\n");
    }
}