Community
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
Turn on suggestions
Auto-suggest helps you quickly narrow down your search results by suggesting possible matches as you type.
Showing results for 
Search instead for 
Did you mean: 
Read only

Pascal Triangle

Go to solution
Former Member

‎2007 Jul 03 11:10 AM

0 Likes
1,122

Is it possible to code for Pascal Triangla in ABAP? If so give me the code?

1 ACCEPTED SOLUTION
Read only

Go to solution
Former Member

‎2007 Jul 03 11:11 AM

0 Likes
418

REPORT ZPM_ITABTRIANGLE .

PARAMETER: N TYPE I DEFAULT 7.

DATA: A TYPE I VALUE 1,

B TYPE I VALUE 1,

C TYPE I.

WHILE A =< N.

C = N - A.

B = 1.

WRITE /.

WHILE B =< C.

WRITE ' '.

B = B + 1.

ENDWHILE.

WHILE B < N.

WRITE '*'.

B = B + 1.

ENDWHILE.

WHILE C < N.

WRITE '*'.

C = C + 1.

ENDWHILE.

A = A + 1.

ENDWHILE.

1 REPLY 1
Read only

Go to solution
Former Member

‎2007 Jul 03 11:11 AM

0 Likes
419

REPORT ZPM_ITABTRIANGLE .

PARAMETER: N TYPE I DEFAULT 7.

DATA: A TYPE I VALUE 1,

B TYPE I VALUE 1,

C TYPE I.

WHILE A =< N.

C = N - A.

B = 1.

WRITE /.

WHILE B =< C.

WRITE ' '.

B = B + 1.

ENDWHILE.

WHILE B < N.

WRITE '*'.

B = B + 1.

ENDWHILE.

WHILE C < N.

WRITE '*'.

C = C + 1.

ENDWHILE.

A = A + 1.

ENDWHILE.