declare
number2 number;
begin
loop
number2:='&接收数据';
exit when mod(number2,2)!=0;
end loop;
end;无论我用goto还是怎么样,都无法达到我想要的效果  请高手赐教.... 我需要循环从键盘接收数据.... 直到得到奇数为止             效果如下(当接收的是偶数  2  4   6  8 时, 让程序继续接收, 当接收到奇数时,退出) .......