Application Development and Automation Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Showing results for 
Search instead for 
Did you mean: 
Read only

PROGRAMMING HELP REQUIRED

Former Member
0 Likes
549

HI,I WOULD LIKE TO KNOW HOW TO FRAME A PROGRAM IN ABAP FOR PRINTING THE PRIME NUMBERS BETWEEN 1-100 USING THE SIMPLE WHILE LOOP..PLS HELP ME

5 REPLIES 5
Read only

Former Member
0 Likes
521

Report YXYZ.

data : j type i value 1.

data : n type i value 100.

data : cnt type i.

data : n1 type i.

data : ans type i.

while j <= n.

n1 = j.

clear cnt.

while n1 <> 0.

ans = j mod n1.

if ans = 0.

cnt = cnt + 1.

endif.

n1 = n1 - 1.

endwhile.

if cnt = 2 or cnt = 1.

write 😕 j.

endif.

j = j + 1.

endwhile.

Read only

0 Likes
521

CAN U ALSO PROVIDE ME THE EXPLANATION FOR THE ABOVE MENTIONED PROGRAM?????PLS ...THANK U

Read only

0 Likes
521

HEY PLS SUMIVASU CAN U PROVIDE ME THE EXPLANATION FOR THIS PROGRAM..I WAS GETTING CONFUSED AS TO WHY DID U PROVIDE THE FUNCTION JMODN1..PLS PROVIDE ME THE EXPLANATION..IT IS VERY NECESSARY FOR ME

Read only

Former Member
0 Likes
521

I NEED MORE ANSWERS TO THE QUESTION

Read only

Former Member
0 Likes
521

Hi,

Use this code to get prime numbers upto 100 numbers.

&----


*& Report ZPRIME

*&

&----


*&

*&

&----


REPORT ZPRIME.

PARAMETERS: LIMIT TYPE I.

DATA: GET TYPE I,

I TYPE I,

PRIME TYPE I,

COUNT TYPE I VALUE 1,

FLAG TYPE I.

DO LIMIT TIMES.

FLAG = 0.

COUNT = COUNT + 1.

GET = COUNT.

I = 2.

IF GET <> 2.

WHILE GET > I .

PRIME = GET MOD I.

I = I + 1.

IF PRIME = 0.

FLAG = 1.

ENDIF.

ENDWHILE.

IF FLAG = 0.

WRITE:/ GET.

ENDIF.

ENDIF.

ENDDO.

IF USEFULL REWARD