04-28-2006 10:18 AM
1.write a program to generate prime numbers from 0 to 100.
2.write the code for the following output
3*1=0003
3*2=0006
3*3=0009
and so on
04-28-2006 10:20 AM
REPORT ztest1 .
PARAMETERS: p_from TYPE i,
p_to TYPE i.
DATA: v_from TYPE i,
v_to TYPE i,
v_remainder TYPE i,
v_is_prime TYPE c,
v_divisor TYPE i.
START-OF-SELECTION.
v_from = p_from.
v_to = p_to.
DO.
IF v_from = v_to.
EXIT.
ENDIF.
CLEAR v_is_prime.
DO v_from TIMES.
v_divisor = sy-index.
v_remainder = v_from MOD v_divisor.
IF v_divisor <> 1 AND
v_divisor <> v_from AND
v_remainder = 0.
*-- not a prime
v_is_prime = 'N'.
EXIT.
ENDIF.
ENDDO.
IF v_is_prime IS INITIAL.
*-- the number is prime
WRITE:/ v_from, 'is a prime number'.
ENDIF.
v_from = v_from + 1.
ENDDO.
04-28-2006 10:25 AM
04-28-2006 10:23 AM
04-28-2006 10:25 AM
04-28-2006 10:23 AM
04-28-2006 10:25 AM
04-28-2006 1:53 PM