topic Re: Prime number Program in ABAP in Application Development and Automation Discussions

Prime number Program in ABAP

Former Member — Thu, 07 Jun 2007 06:51:16 GMT

Hi,

Plz send the program for prime number.

Re: Prime number Program in ABAP

Former Member — Thu, 07 Jun 2007 07:58:10 GMT

Hi,

Following is the program for prime number

Report zprime.

parameters : num type i.

data : res type i.

res = num MOD 2.

if res = 0.

write : 'This is not a prime number'.

else.

write : num, 'is a prime number.'.

endif.

Re: Prime number Program in ABAP

anversha_s — Thu, 07 Jun 2007 08:03:12 GMT

hi Nagraju,

Check this out u will find a solution for your question

<b><i>Note : Please close ur factorial query. I already gave u the correct answer for that.</i></b>

Regards

anversah

Re: Prime number Program in ABAP

Former Member — Thu, 07 Jun 2007 08:44:29 GMT

good

go through this program

REPORT zprime .

DATA : t_no TYPE i,

res TYPE p,

pr_no TYPE p,

tag TYPE i.

SELECTION-SCREEN BEGIN OF BLOCK b1.

PARAMETERS : pr_num TYPE i.

SELECTION-SCREEN END OF BLOCK b1.

pr_no = 1.

WHILE pr_no LE pr_num.

t_no = 2.

tag = 0.

WHILE t_no < pr_no.

res = pr_no MOD t_no.

IF res = 0.

WRITE : / pr_no.

WRITE : 'is not PRIME Number ' COLOR 3 INTENSIFIED OFF.

tag = 1.

EXIT.

ENDIF.

t_no = t_no + 1.

ENDWHILE.

IF tag = 0.

WRITE : / pr_no.

WRITE : 'is PRIME Number ' COLOR 6 INTENSIFIED OFF.

ENDIF.

pr_no = pr_no + 1.

ENDWHILE.

thanks

mrutyun^