restart: with(numtheory): printlevel:=0: code := 48060243676482550185323184292022419217928047933749938907846748780722721286359839816133384336438501386948505160897659383209290551471360365537175570834758204334968746748216487486929676662691867260009586902500350961902342830314682920779996098278522072512510094997434821314814618345628893781674324457478454424927170199183044309492352232294149922432533537681010130517842297616386157845621394732159969040290110093393012833091341044816723046811482785429305035925731864488953101320614535687096374184961254623816977860862673418696786082848130612003151713611309441026971193221355061182162817021468424613534347873149896853820493690131801648140149511220831112717029453828242903039289611052546322670365956496544618177604245432425536337722105314342920148309628743434068453886400423918729795592465313352694975814954646013225389122075975481890288473949158780502753671598488457437573559544762426105180253850624507696915747866010213887549186669422216366951508826736567327396428408507275046927448902945747653828889705644439635476404971; N := 50530703457870752715703756173180064142965797133229821646531296701006446759045181787453809963947421348941174726295508572278040228467138300411751756173844312759617723371676972924616579040066742722721125795879304485139250675241951721576900737088418043524022980131152628171657068456983263507443595857425725891537085750348612093959133642414822242047671158740434368301751527451153139370155589640006725511206395108284848347212128069501791721351790498814621345225916614625495311536375965601981618126988633390567865241968372996712604095682412743788071642985715129626606215058881862947507755005581096670846578884559981076432173713247872840498939509343017459999947719918598562070550687925411426557841568611313785041713256644069574334056018299833461491082614281861114878811241953662001721142069432934320292297607988350924408466509753861410266665235871751090882976380649221830074008359679964838445166239477055104933336926909019732575268975459866668749277310166063499987077621486209383718097574216359202896753947776818370700921481: d:=26182533308148547627499301174014710146976057452519725655111946755313505846910725026887093057699751669241155271196516699676242453998191539522623796619926562878072047462150949152816322422287083574663770914238967551793601144252904479404110371133301758103094168114644532248131386323627572733730583523382393488689273854039133334685566607695159166655062992764651260120968910842866605281477284095034712865971867945224895218512037979309729233808447951499241322864514617112632731127091632358897092884715372718116171057785558804979101029295805110873654076352961759619419801679412769630639335958256564370403967357017974567001151715105504723419177381755077121649491710350604599898438911350171456157562017232002127198989327961362000139049662743134100496381793225794591993519217047118597440590647769967832135017530211458492466997835872135172068751478339568569719455076461236845597780206784826218708763134282862397953131485741445366767724940880170488645699924110750671561395325199285049729883883329381091335133983750490621528369551: G:=table([(11)="A",(12)="B",(13)="C",(14)="D",(15)="E",(16)="F",(17)="G",(18)="H",(19)="I",(20)="J",(21)="K",(22)="L",(23)="M",(24)="N",(25)="O",(26)="P",(27)="Q",(28)="R",(29)="S",(30)="T",(31)="U",(32)="V",(33)="W",(34)="X",(35)="Y",(36)="Z",(41)="a",(42)="b",(43)="c",(44)="d",(45)="e",(46)="f",(47)="g",(48)="h",(49)="i",(50)="j",(51)="k",(52)="l",(53)="m",(54)="n",(55)="o",(56)="p",(57)="q",(58)="r",(59)="s",(60)="t",(61)="u",(62)="v",(63)="w",(64)="x",(65)="y",(66)="z",(70)="0",(71)="1",(72)="2",(73)="3",(74)="4",(75)="5",(76)="6",(77)="7",(78)="8",(79)="9",(81)=" ",(82)="*",(83)="@",(84)=",",(85)=".",(86)="!",(87)="'",(88)="(",(89)=")",(90)="{",(91)="}",(92)="?",(93)="`&`",(94)="^",(95)="#",(96)="$",(97)="%",(98)="-",(99)="+",(37)="~",(38)="<",(39)=">",(40)="=",(67)=";",(68)=":",(69)="[",(80)="]",(10)="/"]): print(``); decode:=code&^d mod N; dec:=decode: word2:="": while dec>0 do y:=dec-(100)*floor(dec/100); word2:= cat(word2,G[y]); dec:=floor(dec/100): end do; cat(`Decoded message: "`,word2,`"`);