topic Re: program for string palindrome in Application Development and Automation Discussions

program for string palindrome

Former Member — Fri, 11 Apr 2008 12:46:01 GMT

hi,

can anyone send me the program for palindrome for a string and also for numbers..

its urgent

thankyou,

Re: program for string palindrome

Former Member — Fri, 11 Apr 2008 12:49:32 GMT

Check out this related thread for answer

Re: program for string palindrome

Former Member — Fri, 11 Apr 2008 12:55:22 GMT

Hi,

This is a bit of a broad spec!

Do you want a program to generate palindromes?

Or do you want it to check if a string is a palindrome?

Does it need to check if they are proper words?

And if so what language?

Regards,

Nick

P.S. I don't have such a program, and if I needed one I don't think ABAP would be my first choice of language

Re: program for string palindrome

matt — Fri, 11 Apr 2008 13:02:01 GMT

Homework question is it?

matt

Re: program for string palindrome

Former Member — Fri, 11 Apr 2008 17:06:54 GMT

i would like to check whether the string is palindrome or not? and i would like to use ABAP to do this,... do u have any program? if so send it to me for my reference.

Re: program for string palindrome

matt — Sat, 12 Apr 2008 08:11:49 GMT

Here's pseudo code - easy to convert to ABAP

pos_end = length of string
pos_start = 1
do pos_end/2 times.
  read character of string at position pos_start and pos_end.
  not the same?
    set flag
    exit
  add 1 to pos_start
  subtract 1 from pos_end
enddo.

if flag set
  say 'not palindrome'.
else
  say 'palindrome'

Re: program for string palindrome

Former Member — Sat, 12 Apr 2008 15:07:22 GMT

hai

sarvesh,

This is one of the logic to find the palendrom.

1. Find the Length of Given string using strlen.

2. Take n = 1 . len = strlen ( string).

len1 = len.

3. Using a Loop based on condition: n le len / 2.

3.1 Check if a[n] = a[len1].

3.2 if true

flag = 'y'.

else.

flag = 'n'.

endif.

3.3 n = n + 1. len1 = len1 - 1.

4. After the end of loop

if flag = 'y'.

write 'palendrom'.

else.

write ' not palendrom'.

endif.

I hope that, this is very simple logic and is very easy to convrt into program.

if useful, reward points.

Thank you,

G.V.K.Prasad

Re: program for string palindrome

matt — Sun, 13 Apr 2008 09:27:39 GMT

Hey - same logic as mine.

Re: program for string palindrome

SUMIT1 — Tue, 03 Jul 2012 21:34:51 GMT

Heii,

I too was going through the same Homework stuff....wanted to make it more lucid...as used in the other languages...i guess using the string reverse is a better option...but just to make it fundamental...here is the coding I did...

parameters: p_input type string.

data: len type i,

len2 type i,

counter type i,

index type i.

len = strlen( p_input ).

len2 = len - 1.

do len times.

if p_input+index(1) = p_input+len2(1).

counter = 1.

else.

counter = 0.

endif.

len2 = len2 - 1.

index = index + 1.

enddo.

if counter = 1.

write:/ 'Palindrome Number'.

else.

write:/ 'Not a palindrome number'.

endif.

The results are accurate and tested.

Sumit

Re: program for string palindrome

Dhivya — Wed, 04 Jul 2012 04:51:58 GMT

Hi,

DATA : in(50) TYPE c,
       rev(50) TYPE c.

PARAMETERS Input TYPE string .

in = input .

CONDENSE IN .

CALL FUNCTION 'STRING_REVERSE'
EXPORTING
    string          = in
    lang            = sy-langu
IMPORTING
   RSTRING         = rev
* EXCEPTIONS
*   TOO_SMALL       = 1
*   OTHERS          = 2
          .

IF in EQ rev.

WRITE : ' THE STRING IS A PALINDROME ' .

ELSE .

WRITE : ' THE STRING IS NOT A PALINDROME ' .

ENDIF.

Thanks,

Dhivya.

Re: program for string palindrome

former_member765822 — Sat, 29 Jan 2022 03:35:45 GMT

"Program to check a palindrome string

class palindrome DEFINITION.

public SECTION.
class-methods: is_palindrome IMPORTING value(im_number) type String
RETURNING VALUE(result) type string.

endclass.

class PALINDROME IMPLEMENTATION.
method IS_PALINDROME.
"Check how many digits
Data(lv_lenght_number) = strlen( im_number ).
data(lv_count_loop) = lv_lenght_number div 2.
subtract 1 from lv_lenght_number.
"you can not use offset directly on importing parameter
data(lv_number) = im_number.
data(lv_counter) = 0.
while lv_count_loop ne 0.
data(lv_digit_from_left) = lv_number+lv_counter(1).
data(lv_digit_from_right) = lv_number+lv_lenght_number(1).
if lv_digit_from_left eq lv_digit_from_right.
add 1 to lv_counter.
subtract 1 from lv_lenght_number.
else.
result = 'Not a palindrome'.
exit.
endif.
result = 'Yes,it a palindrome'.
subtract 1 from lv_count_loop.
endwhile.

endmethod.
endclass.

START-OF-SELECTION.
data : result type string.
palindrome=>IS_PALINDROME(
EXPORTING
IM_NUMBER = 'abababa'
RECEIVING
result = result

).

Re: program for string palindrome

raga1234 — Tue, 12 Jul 2022 06:07:13 GMT

you have to add exit statement below "counter = 0."