在PL / SQL中计算数字中的奇数和偶数

我们给定一个正整数数字,任务是使用PL / SQL计算数字中奇数和偶数的计数。

PL / SQL是SQL与编程语言的过程功能的组合。它是由Oracle Corporation在90年代初开发的,目的是增强SQL的功能。

PL / SQL与SQL本身和Java一样,是Oracle数据库中嵌入的三种主要编程语言之一。

输入-整数= 23146579

输出结果 

count of odd digits in a number are : 5

count of even digits in a number are : 3

说明-在给定的数字中,我们有2、4、6作为偶数,因此数字中的偶数计数为3,而我们有3、1、5、7和9作为奇数,因此计数中的奇数一个数字是5。

输入-整数= 4567228

输出结果 

count of odd digits in a number are : 2

count of even digits in a number are : 5

说明-在给定的数字中,我们有5和7作为奇数,因此数字中的奇数计数为2,而我们有4、6、2、2和8作为偶数,因此对数字中的偶数进行计数是5。

以下程序中使用的方法如下

  • 在PL / SQL中使用的数据类型为NUMBER的整数类型变量中输入数字。

  • 采用VARCHAR(50)类型的长度,该长度描述可以存储的最大大小长度。

  • 取两个变量作为奇数位的计数和偶数位的计数,并将它们初始设置为0

  • 从1开始循环直到长度,同时向其传递数字

  • 在循环内部,将长度设置为substr(number,i,1)

  • 现在,检查长度为2的IF mod不等于0,然后增加数字中奇数的计数

  • 否则,增加数字中偶数的数量

  • 打印结果。

示例

DECLARE

   digits NUMBER := 23146579;

   length VARCHAR2(50);

   count_odd NUMBER(10) := 0;

   count_even NUMBER(10) := 0;

BEGIN

   FOR i IN 1..Length(digits)

   LOOP

      length := Substr(digits, i, 1);

      IF mod(length, 2) != 0 THEN

         count_odd := count_odd + 1;

      ELSE

         count_even := count_even + 1;

      END IF;

   END LOOP;

   dbms_output.Put_line('count of odd digits in a number are : ' || count_odd);

   dbms_output.Put_line('count of even digits in a number are : ' || count_even);

END;

输出结果

如果我们运行上面的代码,它将生成以下输出-

count of odd digits in a number are : 5

count of even digits in a number are : 3

以上是 在PL / SQL中计算数字中的奇数和偶数 的全部内容, 来源链接: utcz.com/z/358918.html

回到顶部