write a pl/sql program to print the sum of numbers from 1 to 100 :
Code
DECLARE
N NUMBER( 5 ):= :N; -- In some compiler it can be "&" for example &N.
CNT NUMBER:= 0 ;
R NUMBER( 2 ):= 0 ;
BEGIN
WHILE N != 0
LOOP
R:=MOD(N, 10 );
CNT:=CNT+1 ;
N:=TRUNC(N/ 10 );
END LOOP;
DBMS_OUTPUT.PUT_LINE('NUMBER OF DIGITS OF GIVEN NUMBER IS '||CNT);
END;
/
output
NUMBER OF DIGITS OF GIVEN NUMBER IS 2 Statement processed.