1、/*游戏规则如下：玩家掷两个骰子，点数为1到6，如果第一次点数和为7或11，则玩家胜，如果点数和为2、3或12，则玩家输，如果和为其它点数，则记录第一次的点数和，然后继续掷骰，直至点数和等于第一次掷出的点数和，则玩家胜，如果在这之前掷出了点数和为7，则玩家输。*/declarea integer;b integer;c integer;d integer;v_sum integer;l_sum integer default 0;begina := b := c := d := v_sum := a + b;l_sum := c + d;if (a 6 or b 6 or c 6 or d 6
2、) thendbms_output.put_line(The input is wrong!);elseif (v_sum = 7 or v_sum = 11) thendbms_output.put_line(Pass,Good job!);elseif (v_sum = 2 or v_sum = 3 or v_sum = 12) thendbms_output.put_line(Fail,Come on!);elsedbms_output.put_line(The first sum is | v_sum);if l_sum = 7 thendbms_output.put_line(Fail,Come on!);elseif l_sum = v_sum thendbms_output.put_line(Pass,Good job!);elsedbms_output.put_line(go on!);end if;end if;end if;end if;end if;end;
