Maple function for while

  • administrators

    In the following the algorithm inside the for while loop runs until the condition the A * B = 0 is met. When the condition is met the for statement finishes and algorithm returns the values of A and B as a list.

    $res = maple("
    gen := rand(0 .. 5):
    det := 1:
    for i while det <> 0 do
    A := gen();
    B := gen();
    det := A*B
    end do:

    In the output below you can see the first value of the list is the variable i, which is the number of times the loop ran until it succeeded.