RosettaCodeData/Task/Palindrome-detection/Pike/palindrome-detection.pike
2023-07-01 13:44:08 -04:00

16 lines
250 B
Text

int main(){
if(pal("rotator")){
write("palindrome!\n");
}
if(!pal("asdf")){
write("asdf isn't a palindrome.\n");
}
}
int pal(string input){
if( reverse(input) == input ){
return 1;
} else {
return 0;
}
}