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.