sub example {
               do {
                    $av = irand(20) +1;
                    $bv = irand(11) +1;
                    $cv = (irand(2))?"+":"-";
                  } until (!($av $cv $bv >= 0 && $av $cv $bv <= 20));
               print $av $cv $bv;
            }