Skip to main content

Pl/SQL Program for checking divisibility by 5


  declare
  num int:=&number;
  begin
  if(num mod 5=0) then
  dbms_output.put_line('no. is divisible by 5');
  else
    dbms_output.put_line('no. is not divisible by 5');
    end if;
    end;
   
    ----------Alternative-----------------
   
    declare
    num int:=&number;
    result int;
    begin
    SELECT decode(num MOD 5, 0, 'divisible', 'nod devisible') INTO RESULT
    FROM dual;

 dbms_output.put_line(RESULT);
      end;
     

Comments

Popular posts from this blog

Pl/SQL program to find square of a user input number Using Function

declare   value1 number;   value2 number;   mytotal number;   function myfun(myval1 in number, myval2 in number) return number is     total number;   begin     total := myval1 ** myval2;     dbms_output.put_line(total);     return total;   end; begin   value1 :=&val1;   value2 := &val2;  mytotal:= myfun(value1, value2); end;