[fpc-pascal] printing each Friday the 13 using Pascal

Gerhard Scholz gs at g--s.de
Mon Aug 6 14:38:37 CEST 2012


YSBxdWljayBhbmQgZGlydHkgc29sdXRpb24KCgotLS0tLSBPcmlnaW5hbCBNZXNzYWdlIC0tLS0t
IApGcm9tOiBpawpUbzogRlBDLVBhc2NhbCB1c2VycyBkaXNjdXNzaW9ucwpTZW50OiBNb25kYXks
IEF1Z3VzdCAwNiwgMjAxMiAxOjE5IFBNClN1YmplY3Q6IFtmcGMtcGFzY2FsXSBwcmludGluZyBl
YWNoIEZyaWRheSB0aGUgMTMgdXNpbmcgUGFzY2FsCgoKSGkgbGlzdCwKCkEgZnJpZW5kIG9mIG1p
bmUgc3RhcnRlZCBhIGhvYmJ5IHByb2plY3Q6ClByaW50aW5nIGV2ZXJ5IEZyaWRheSB0aGUgMTMs
IGluIGEgcmFuZ2Ugb2YgNSB5ZWFycy4KCkkgbGFjayBvZiB0aGUgdGltZSBmb3IgZG9pbmcgaXQg
YXQgdGhlIG1vbWVudCwgYW5kIEkgd2lzaCB0byBhZGQgdG8gaGlzCmdpdGh1YiBhbHNvIFBhc2Nh
bCAoYW5kIHNob3cgaG93IG11Y2ggc2ltcGxlciBpdCBpcyB0aGVuIEMpIGltcGxlbWVudGF0aW9u
LgpJcyB0aGVyZSBhbnlvbmUgaGVyZSB0aGF0IG1pZ2h0IGJlIGludGVyZXN0ZWQgaW4gdGhpcyA/
CgpJZG8KCgoKCl9fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19f
CmZwYy1wYXNjYWwgbWFpbGxpc3QgIC0gIGZwYy1wYXNjYWxAbGlzdHMuZnJlZXBhc2NhbC5vcmcK
aHR0cDovL2xpc3RzLmZyZWVwYXNjYWwub3JnL21haWxtYW4vbGlzdGluZm8vZnBjLXBhc2NhbAot
LS0tLS0tLS0tLS0tLSBuZXh0IHBhcnQgLS0tLS0tLS0tLS0tLS0KQSBub24tdGV4dCBhdHRhY2ht
ZW50IHdhcyBzY3J1YmJlZC4uLgpOYW1lOiBGcmlkYXkxMy5wYXMKVHlwZTogYXBwbGljYXRpb24v
b2N0ZXQtc3RyZWFtClNpemU6IDE4OTcgYnl0ZXMKRGVzYzogbm90IGF2YWlsYWJsZQpVcmwgOiBo
dHRwOi8vbGlzdHMuZnJlZXBhc2NhbC5vcmcvbGlzdHMvZnBjLXBhc2NhbC9hdHRhY2htZW50cy8y
MDEyMDgwNi9hZjg0NzJmNy9GcmlkYXkxMy5vYmoK


More information about the fpc-pascal mailing list