Unconfigured Ad Widget

Collapse

Announcement

Collapse
No announcement yet.

Today is a palindrome

Collapse
X
 
  • Filter
  • Time
  • Show
Clear All
new posts

  • Today is a palindrome

    11022011 There may be one that's sooner but this is the first one my lazy mind came up with. If it's any consolation, the next palindrome year is 2002, and we shouldn't have another p-year until 2112, which is slightly longer than the last p-year which was 1991. Of course, November (11) always has been and always will be a palindrome month. Also, if you drink Evian water, have you ever noticed that 'Evain' is 'Naive' spelled backwards. Harry Caray would be proud. When the late great Chicago Cubs announcer would do a ballgame, he would always tell the viewers (usually between pitches and Budweisers) what the players names were spelled backwards. It was some nice local Chicago flavor and sometimes entertaining. Kivtreh Eoj

  • #2
    Today is a palindrome

    20022002 Or maybe I just have too much time on my hands this morning.

    Comment


    • #3
      Today is a palindrome

      The palindrome of Bolton is Notlob.

      Comment


      • #4
        Today is a palindrome

        Geez Ted, now I know why I got up this morning. Today is the first MM-DD-YYYY palindrome since 08/31/1380 !! Here's a REXX program that prints all 366 date palindromes in chronological order.
         Do X = 1 To 9999 Year = Right( X, 4, '0' ) Month = Left( Reverse( Year ), 2 ) Day = Right( Reverse( Year ), 2 ) If Month >= 1 Then If Month <= 12 Then If Day >= 1 Then, If Day <= Word( '31 29 31 30 31 30 31 31 30 31 30 31', Month ) Then, Say Month'-'Day'-'Year End X

        Comment


        • #5
          Today is a palindrome

          For those who do not know REXX, can you please offer a simpler translation to something like BASIC or C++? TIA Phil

          Comment


          • #6
            Today is a palindrome

            For those of us uninclined to load up your Rexx program, can you please print your output so we can see what the Palindrome dates are? I'll hang up now and listen for my answer. Restless in REXX-land

            Comment


            • #7
              Today is a palindrome

              Here's the REXX list. 10-10-0101 01-10-0110 11-10-0111 02-10-0120 12-10-0121 03-10-0130 04-10-0140 05-10-0150 06-10-0160 07-10-0170 08-10-0180 09-10-0190 10-20-0201 01-20-0210 11-20-0211 02-20-0220 12-20-0221 03-20-0230 04-20-0240 05-20-0250 06-20-0260 07-20-0270 08-20-0280 09-20-0290 10-30-0301 01-30-0310 11-30-0311 12-30-0321 03-30-0330 04-30-0340 05-30-0350 06-30-0360 07-30-0370 08-30-0380 09-30-0390 10-01-1001 01-01-1010 11-01-1011 02-01-1020 12-01-1021 03-01-1030 04-01-1040 05-01-1050 06-01-1060 07-01-1070 08-01-1080 09-01-1090 10-11-1101 01-11-1110 11-11-1111 02-11-1120 12-11-1121 03-11-1130 04-11-1140 05-11-1150 06-11-1160 07-11-1170 08-11-1180 09-11-1190 10-21-1201 01-21-1210 11-21-1211 02-21-1220 12-21-1221 03-21-1230 04-21-1240 05-21-1250 06-21-1260 07-21-1270 08-21-1280 09-21-1290 10-31-1301 01-31-1310 12-31-1321 03-31-1330 05-31-1350 07-31-1370 08-31-1380 10-02-2001 01-02-2010 11-02-2011 02-02-2020 12-02-2021 03-02-2030 04-02-2040 05-02-2050 06-02-2060 07-02-2070 08-02-2080 09-02-2090 10-12-2101 01-12-2110 11-12-2111 02-12-2120 12-12-2121 03-12-2130 04-12-2140 05-12-2150 06-12-2160 07-12-2170 08-12-2180 09-12-2190 10-22-2201 01-22-2210 11-22-2211 02-22-2220 12-22-2221 03-22-2230 04-22-2240 05-22-2250 06-22-2260 07-22-2270 08-22-2280 09-22-2290 10-03-3001 01-03-3010 11-03-3011 02-03-3020 12-03-3021 03-03-3030 04-03-3040 05-03-3050 06-03-3060 07-03-3070 08-03-3080 09-03-3090 10-13-3101 01-13-3110 11-13-3111 02-13-3120 12-13-3121 03-13-3130 04-13-3140 05-13-3150 06-13-3160 07-13-3170 08-13-3180 09-13-3190 10-23-3201 01-23-3210 11-23-3211 02-23-3220 12-23-3221 03-23-3230 04-23-3240 05-23-3250 06-23-3260 07-23-3270 08-23-3280 09-23-3290 10-04-4001 01-04-4010 11-04-4011 02-04-4020 12-04-4021 03-04-4030 04-04-4040 05-04-4050 06-04-4060 07-04-4070 08-04-4080 09-04-4090 10-14-4101 01-14-4110 11-14-4111 02-14-4120 12-14-4121 03-14-4130 04-14-4140 05-14-4150 06-14-4160 07-14-4170 08-14-4180 09-14-4190 10-24-4201 01-24-4210 11-24-4211 02-24-4220 12-24-4221 03-24-4230 04-24-4240 05-24-4250 06-24-4260 07-24-4270 08-24-4280 09-24-4290 10-05-5001 01-05-5010 11-05-5011 02-05-5020 12-05-5021 03-05-5030 04-05-5040 05-05-5050 06-05-5060 07-05-5070 08-05-5080 09-05-5090 10-15-5101 01-15-5110 11-15-5111 02-15-5120 12-15-5121 03-15-5130 04-15-5140 05-15-5150 06-15-5160 07-15-5170 08-15-5180 09-15-5190 10-25-5201 01-25-5210 11-25-5211 02-25-5220 12-25-5221 03-25-5230 04-25-5240 05-25-5250 06-25-5260 07-25-5270 08-25-5280 09-25-5290 10-06-6001 01-06-6010 11-06-6011 02-06-6020 12-06-6021 03-06-6030 04-06-6040 05-06-6050 06-06-6060 07-06-6070 08-06-6080 09-06-6090 10-16-6101 01-16-6110 11-16-6111 02-16-6120 12-16-6121 03-16-6130 04-16-6140 05-16-6150 06-16-6160 07-16-6170 08-16-6180 09-16-6190 10-26-6201 01-26-6210 11-26-6211 02-26-6220 12-26-6221 03-26-6230 04-26-6240 05-26-6250 06-26-6260 07-26-6270 08-26-6280 09-26-6290 10-07-7001 01-07-7010 11-07-7011 02-07-7020 12-07-7021 03-07-7030 04-07-7040 05-07-7050 06-07-7060 07-07-7070 08-07-7080 09-07-7090 10-17-7101 01-17-7110 11-17-7111 02-17-7120 12-17-7121 03-17-7130 04-17-7140 05-17-7150 06-17-7160 07-17-7170 08-17-7180 09-17-7190 10-27-7201 01-27-7210 11-27-7211 02-27-7220 12-27-7221 03-27-7230 04-27-7240 05-27-7250 06-27-7260 07-27-7270 08-27-7280 09-27-7290 10-08-8001 01-08-8010 11-08-8011 02-08-8020 12-08-8021 03-08-8030 04-08-8040 05-08-8050 06-08-8060 07-08-8070 08-08-8080 09-08-8090 10-18-8101 01-18-8110 11-18-8111 02-18-8120 12-18-8121 03-18-8130 04-18-8140 05-18-8150 06-18-8160 07-18-8170 08-18-8180 09-18-8190 10-28-8201 01-28-8210 11-28-8211 02-28-8220 12-28-8221 03-28-8230 04-28-8240 05-28-8250 06-28-8260 07-28-8270 08-28-8280 09-28-8290 10-09-9001 01-09-9010 11-09-9011 02-09-9020 12-09-9021 03-09-9030 04-09-9040 05-09-9050 06-09-9060 07-09-9070 08-09-9080 09-09-9090 10-19-9101 01-19-9110 11-19-9111 02-19-9120 12-19-9121 03-19-9130 04-19-9140 05-19-9150 06-19-9160 07-19-9170 08-19-9180 09-19-9190 10-29-9201 01-29-9210 11-29-9211 02-29-9220 12-29-9221 03-29-9230 04-29-9240 05-29-9250 06-29-9260 07-29-9270 08-29-9280 09-29-9290

              Comment


              • #8
                Today is a palindrome

                This palindrome date is nice but I must admit, I was much more excited when I saw 12:34:56 on 7-8-90 on a S/36 screen 11 years ago! Chris

                Comment


                • #9
                  Today is a palindrome

                  Gene, Your REXX PGM works great for MM-DD-YYYY. I am very new to REXX. Can you post a version that lists the Palindrome dates that would be in DD-MM-YYYY format. I can't seem to figure out how to do this. Thanks

                  Comment


                  • #10
                    Today is a palindrome

                    ...and life has been an anti-climax ever since? :-) Dave...

                    Comment


                    • #11
                      Today is a palindrome

                      It's not a palindrome! The palindrome of "Bolton" would be "Notlob"!! It don't work!! Well, what do you want? I'm not prepared to pursue my line of inquiry any longer as I think this is getting too silly! Quite agree, quite agree, too silly, far too silly. Come on, you, you've got to go do another sketch now! Come on. :-)

                      Comment


                      • #12
                        Today is a palindrome

                        Gene, I can't believe that I finally figured out how to do this. I don't REALLY understand why/how this works, only that it does. Do X = 1 To 9999 Year = Right( X, 4, '0' ) Month = Right( Reverse( Year ), 2 ) Day = Left( Reverse( Year ), 2 ) If Month >= 1 Then If Month <= 12 Then If Day >= 1 Then, If Day <= Word( '31 29 31 30 31 30 31 31 30 31 30 31', Month ) Then, Say Day'-'Month'-'Year End X Thanks

                        Comment


                        • #13
                          Today is a palindrome

                          Does this mean that from this point forward we will all get younger? :-) Dave

                          Comment


                          • #14
                            Today is a palindrome

                            Someone did it years ago in REXX; It's a three liner... bobh

                            Comment


                            • #15
                              Today is a palindrome

                              Someone did it years ago in REXX; It's a three liner... Please post it, Bob. Gene's REXX proc was 8 lines long.

                              Comment

                              Working...
                              X