@L|}6CD l0C)HCC WhL/h `CmCDiD`  R@W1  Y0@R !L` D  C D     )16CS S)  C)D1 p p 0 C9DI pCDL~CiCDiD` D  C D     )16CS S)  C)D1 p p }0 C9DI pCDL~CiCDiD` DD˙` d J)L !}D L(( LL()  L| L( S LH 0p n  } CY?  q  L L  ` )} `A! d߰")-݆ "  $G@LLL&0") $G% }H0 3S8`G ȱG ȱG   Gȭ Gȭ GG}GHiH8(()) G$H% `(0 })8` d)L ݆ & LGȘ ݆LL d  ! LL d)N>Q  HH) }  hyhyB q L> Lm JJ  Ln*` dB%' }8  H H` 1 { LL   !L     Hh SY?  q  1L }  !? S   q 1 L   Ll  Lg E`L   !L)  q 1L}) `L0AM݊L݉ ML  N݆LLLNLMLHG!@}1F GȱGLLEEȩÑEȑEEȑE Ed E7EȩE  q} L !,0,0SGɛ L 1 !L EHEh W G gLLSROTCES EERF } G) *Gȩ GȽG GȌd q q G`  8   0G  `D}CEDC0X:Ȣ Y ȱC* ? 0.. , 0%n ?A[ 0 : L`L  `, 0`Y}`piH n0)բY? 08`0 }  0$L GGȽG L `8L`L}8`  05G)݁,G)ȱGȱGHh0})Hh` B! 8`8iiiLE`}E8FEh( l0`ɃLL L8^~jj8jHi hEEEiEȱEiE` dTE} H8EEȱEEȩEh J E8   . m  i`LI!)E1FR}1LJ舩9GIH`LJJ`HGHh l`} S gL   8 rii `дCDCG W  }C  Lq` X٨`DOS SYS IIIIIIIIIIIIIIIC`0 ߩ0}}} HE |||DDOS DOSDOS SYS }}}}CDOS SYS} 0`BDELV !B }`LVUQ   ]   TU J ]L!T  #      TU  } L ? .  t`GBJ V~DEHI B V0dV!}QDEHI VF9 ,0 ,0 s0hhL  L` H hDHEh"}DEL8HI   0 HI,0 0  9 .G VLO#},0 L4*IJ`llD1:AUTORUN.SYSNEED MEM.SAV TO LOAD THIS FILE.D1:MEM.SAV J y08 B|DEHI$} V0 0`B;DELV䌚 !B y`@ʆ v s? F0Ξ05: [ BDEHI%} VY8 B V  @  /DE `E:D1:DUP.SYSERROR-SAVING USER MEMORY ON DISKTYPE Y TO &}STILL RUN DOS B;DE J V (` 9 V⪍ ઍ  -'}LLu DEHILV 9 .l 9 .l  `` s$B VBH(}I|DE V BLV nB,DE J V* \*` B V BLVDEHI BLVL)}1 3u H232435; 1 ;  hh@2 e1i1LHҍ 00) 08 109hh@ Ҡ2e*}1i1232435ޥ<<8} 3E:}DISK OPERATING SYSTEM II VERSION 2.0SCOPYRIGHT 1980 ATARIA. DISK DIRECTORY I. FORMAT DISKB. RUN CARTRIDGE J. D,}UPLICATE DISKC. COPY FILE K. BINARY SAVED. DELETE FILE(S) L. BINARY LOADE. RENAME FILE M. RUN AT ADDRESSF. LOCK F-}ILE N. CREATE MEM.SAVG. UNLOCK FILE O. DUPLICATE FILEH. WRITE DOS FILES9!&x#!7&p))'&X*./)L''-؆莟.}R'S  vW DEHHI 1A#! @ ~0ɛ8A0.) ȅ 1 1i/}il ! 1L NO SUCH ITEMSELECT ITEM OR FOR MENU! 0 .{z:*{}.|~ 1 0 00}JB 18L^%|DLl%DIRECTORY--SEARCH SPEC,LIST FILE? # 0 0 n&|D! 1L NOT A DISK FILE1}N !B 1L " 1 !BDED:}:1BJ|DE 1DEBH2}I 1 h0ߢ 0.  0?詛 1 ~0YЛ 1 "L<" "L 3} BL1TYPE "Y" TO DELETE...DELETE FILE SPECCOPY--FROM, TO?OPTION NOT ALLOWED COPYING---DN:4}# 0|D .L$A#B#C#JB|DE 1BHIDD#E 1D#0: B5} 1L B#C#C#B# B 1N#$0SYS1}:e#D# d# D# .d#ȽD# d# 𩛙d#X# 1,A#6}PdD#ELO- A.BJdD#E 1 1HH 0hh|DL^%1}:e# Lt% e#dD#EL%7} 1 0 . .0% 1L WILD CARDS NOT ALLOWED IN DESTINATION 0 A.|K@C}//3Hu ξL/L DRIVE TO WRITE DOS FILES TO?WRITING NEW DOS FILESTYPE "Y" TO WRITE DOS TO DRIVE 1.?}D1:DOS.SYSERROR - NOT VERSION 2 FORMAT. , &* բ( 1L `[) 0NΞ 0 L1M) 1@} L BAD LOAD FILELOAD FROM WHAT FILE?) 0 0#B 1L WHAT FILE TO LOCK?) 0 0$B 1L WHAT FILE TO UNLOCK?DUA}P DISK-SOURCE,DEST DRIVES?TYPE "Y" IF OK TO USE PROGRAM AREACAUTION: A "Y" INVALIDATES MEM.SAV. h  ,B}  `)  <0 2 2 0  ,   ,,ޢ* 1L ,K* 1 ~0 0C}FINSERT BOTH DISKS, TYPE RETURNERROR - DRIVES INCOMPATIBLE., 1 ~038  , 1L D}, &*  Lz+, 0 , 1 ~0 + Y,0!,0 ,L+ ,mm  v,"ǭE}0Ξ, 05,Lt+L +,Hh` NOT ENOUGH ROOMINSERT SOURCE DISK,TYPE RETURNF}INSERT DESTINATION DISK,TYPE RETURN`    `L,8,0( rG}L1(`ߢ) 1* 1 ~0Y`hhL S SL1) 8`NAME OF FILE TO MOVE?- 0 0|DLtH}% A., 1 <0 0 .@L# .BJ 1  DEHIB V L1 ,5 1 <0,L. I} JB|,A#Pd#DE 1 HI BDEHHII 1 B 1 , 1 <0,0Lf- B VJ},A#P, 1 <0 0L#L ߢ) 1* 1 ~0Yj383}mm ݭK}}`8}``|* ? ɛ,`|:(|/ 1L `DESTINATION CANT L}BE DOS.SYS0 0H{ $22Δ $28/L /) $2 Π $2 0 ξM}hAΞB,0 J 1 BޝDEHI,HDE 1HIHIDELSAVE-N}GIVE FILE,START,END(,INIT,RUN)O X0 1`BDEPHI V` X0H 1 L O}0 0 1L0`PLEASE TYPE 1 LETTER,0`hhL <0 1L0LA1 ,;ɛ7,"ɛ:ݦ1ݥP}A"D|ݤD|ȩ:|ȩ|ɛ,,(/+.ީ1 1,ɛ`轤{Q}NAME TOO LONG B VL ` L1I H1EӝDL1|mDiE` V0`8d/8 i:"2!22 1R} L ERROR- 164ɛ+,' 20*.. өw2 1``2TOO MANY DIGITSINVALIDS} HEXADECIMAL PARAMETER800 0 8 00`,0'D800H,ɛh`2L1NEED D1 THRU D4uT} HEXADECIMAL PARAMETER800 0 8 00`,0'D800H,ɛh`2L1NEED D1 THRU D4u3Y B V䭧333333 s333 jB3D3E JK VL4V}iiii8`: 3E: c33L3 c33L33 63 63L3L3 3L3W}Lt L4 :4!5 %:4,D:MON6%:4}5%:4d5X}Y}LL$5 %Y5(%[5)%[5)%_5)%W5)%S5%9)$%S5!)LLg5 Z}   LL5L+6  V88`8 (#(((()) ) `Z742U|8cW7_cᤜ[}8`(()b)) !68(( * %@ $b,@ $d*|8 %@ & (\}(@ $dK$ (@@$(($H(&$(&(@)& (( & $ (& (|8zᢓ9$h|8|8LL]}6 VҼQ R TTLL6  V8() $(U8 U @ $` 2B(  2U @$ (LL]7L7 ^} ,CON: $(Z,LST:=,P:$(Z,KBD:,TRM:2Z( 0 $ $~ + $d f2"F_}  . .C@  4AF+LL 8 i8 8 1t9Dࢅ9D8D$|8D%%*%*)LLY8`}  %U5)LLl8  %U5! LL8 %W5(LL8  %W5 LL8L8L8L8        a}  Ħ   @ D 9ʠBDȱEHȱI V45HIȑȩb}ȩLc98 9`LLw9  LL9   Vʝʝ`U5U5`9`LL9 c}6fM|ģJ1k4bKv :x#YȦ#6Jd}aD`Ȣ,ZCm1I߰尵 e} 쮵dp|Ķж_ج@ޯ5J|g} ùLLLLLLūLʫLϫLԫLL|LʰLLLL/LPL_LLOLbLuh}LLLLL=L_LLLLܶLLLZLJL LLL_x ʾʝ͝L ؾʝ͝L ʾ̠qʝi}iL ʾ̠qHih̠ʝ̝L)ʝƝLʝL ؾʝLj}ʝƝL ؾʝ̝L ʾʱ̝L ؾʱ̝L ʾʝ͝L)i ʱk}̝L ؾʝ͝L)i ʱ̝LL ؾLȽƩL l}Ƚ̩L ʾʘeʅʪʽ̘ʩL ؾʘeʅʪʽ̘ʩL ʾ)i ʘeʅʪʽ̘ʩm}L ؾ)i ʘeʅʪʽ̘ʩL 羥ʝ͝L ʝ͝L 羠ʝL ʝn}L 羠ʝ̝L ʝ̝L 羠ʱ̝L ʱ̝L 羠ʝ͝L)i o}ʱ̝L ʝ͝L)i ʱ̝L 羠L L 羠Ƚ̩L p}Ƚ̩L 羠ʘeʅʪʽ̘ʩL ʘeʅʪʽ̘ʩL 羠)i ʘeʅʪʽ̘ʩL q})i ʘeʅʪʽ̘ʩL̽͠ʝL̽͠ʝ̝L̽͠ʱ̝Lr}̽͠)i ʱ̝L̽͠ޑLνϽ̽ͥΠ̥ȑLiȹ͠ʘeʅs}ʽ̘Li ފeިȹͤކʘeʅʪʽ̘LʝL  ʝt}LʝLʝL楠ʱL)i He楈ʱheL楥ʝu}eLeeʝLeȱeͥʝ͝L)ʝLȱ͠ʝv}Lȱ͠ʝ̝Lȱ͠ʱ̝Lȱ͠i ʱ̝Lȱ͠Lw}ȱ͠Ƚ̩Lȱ͠ʘeʅʪʽ̘ʩLȱ͠i ʘeʅʪʽ̘ʩLHȱx}hLJLLLLLJ)HeȅheɅLJߩLy}νϥΠ8ΥϐΠȱ&ϥe΅Υeυϩe΅ΐϠeȅ)eɅL8ƅiz}iȑ8eHȱeh L8ƅiiȑHȱh L8ƅiiȑ腤腥 Ll{}ȱeLeLL֫L֫L֫L֫L֫L֫L֫ʨhh8ƥHΥhH 8ȥ|}ѥ8 L0ȱѥ8 ƅ8儑ȑˑȩh˥ ȵЕƥѕǥȠȑȥɥ8冥}}凰8h 긦ʩLʠ ȱˠȱɥ ƵǠeȱe` ؾ /0ȑL;8~}ȑ ) 8L98̽ȑL ؾ /ȑL8̽ȑ )} iLi̽iȑLi̐ȱi` ؾ>8ȱ ) iLi}ȱi̩LʠeȪ)eɅL ؾؠ8ȱ ) 8Lf8ȱ̩LΑ}Α`eυϥeхѤ ΑшΑ`ҽӽνϽн` k` L } ` LqqL8LqL8L}LLʽLL8нʠȱ ʽeҝeӝL8p}0p 00LʝLLʝL}}L8Lν}Ͻнц` a 6L a ʥʝӝ` |L Lнѽνφ` ѽLа ʥʝӝ` L }L ѽL ʥʝϝ` L L==LL]]LI}ILIiIiL\T_WO@ /;09D /20= /0+6 /10/ /$ / /  }/LLԭL{5ԭ6L +NԭOL²DgԭhL}]ԭLҲ"vԭLٲ)0L ԅȱԅl P)8 P"1 P,* P# P  P}LL _)8 _"1 _,* _# _  _ʝLʝL}нѽνϠȱ ` T)8 T"1 T,* T# T  TʝLʝLн}ѽνϠȱ * ` ˳п ˳Щ8f Lފeި`Щ&&&ѥ8ХѰ)FfFfFfΊeLM8` }` 9` I9` ȹϥ  9\LHʊeުhʝ`H } 8h` Ǵ  Ǵ ފeުʝ` ފeުʝ`H I9 hLhLH I=} hLhLީνϤީʝʥ L\`ީԽսҽӤީʝʥ8}֥ӅאzץԅΥՅϥ e҅ΥӅϥ V \8ְץ;)FfFfFf֥ T}LQ`? @ OL bL uL L 㴩L 괩L =L L} _L L޽νϽнцʩΠЩL;ޠȪΑ`} ܶL` JLoʝp` ZLʝ` qLνφʭޠm8ߩLȷ}΅ߥޱΝ` L L 謀` L  S 8 긠Ăă:Х}ѭxέyϭzҭ{ k 빭}~``rLָީߦߩ B ViBԸDոE} JK V䥌LtE:ѸHeإih(lHoh(LָʪHH; hg gh . պh {z g պY'NL}L  gh . պh `FATAL ERROR: YCONTINUE (Y/N)? iNON-FATAL ERROR: |H ii0 պh(`HJJJJ hH) }h(`8g LL Le 楰業 ll!ʹ`LLL e8 L" }=ȹ=lٻ HP XHH B VBDEJK VLK:hh`HH8hhh(}`HHHBHI V0腉hhh`HHHH BHIh Vhhh`τΆޢBiDiEޝHI V0}HHHLFHhLF`HHH պ պ պhhh(`τΰ  պLo պ` պ`ɛ ɛ `}ν ` Lν H պh` LнцʥѤЦ ` ứL Li պ` }Liʦ8 g` (L LuLָ ༰K ༰Bτ ༰9фХ8΅ХυѦީBΝD}ϝEНHѝI V8d 긥8ΰϥHHީ B V0ۦ`ީBҝDEHI V80Ӥ`ffА} e΅ԥeυffff`ޢEj"je΅ԥeυLl8΅ԥυ8ffffFf&`҅ӥҩө}΅ϩ`$0&8Шѐτ&&Ff`E$IiХIi$IiΥIi (IiΥI}i(IiҥIi`  p `p`I `)޽)`нѽνφʠАЪ  }(`ʠ (`eƅ̩eDž`eƅȱeDž`)pJJJʪu̩uͦ`)pJJJ}uȱuͦ`eυffff`ޢEj"je΅ԥeυLl8΅ԥυ8ffffFf&`҅ӥ}ҩө΅ϩ`$0&8Шѐτ&&Ff`E$IiХIi$Ii`3y 5 L $L" L!L*"Ln#L#  $  %)%*20, file name? 0 bl%*2@.%*2,Enter for default: 0%*2$0Q. b ` b02 `@ $` ` @[2  D@$[2 $f@ $:b }$@ $:b02,D:   %),Source%), $%),%%)%)4@%% $D@ $.bk%% },.PAS%%@ D@%)$[2%),TOK$|)%),Token %),TOK$%)%l)4%%)%)34ӑ %) },Code %),ERL$%)%%#%)%)4 %*2$}0%*2, ATARI Pascal 0@.%*2 }, Version 1.0 : 1-Mar-82 0@.%*2, (c) 1982 by ATARI 0@.%*2@.%*2@.%*2, E)dit C)ompil }e0@.%*2, L)ink R)un0@.%*2, D)os Q)uit0@.%*2@.%*2, Enter letter and : 0 %e),D:PH0%C),D2:MEDIT%2),D:LINK w%v)%*20Q.%v) `%v)@ $C $c $E $e $R $r } $L $l $D $d $Q $q  2))%(%v)@ ٕ!%(R%*2, Change D1 to compiler disk0 }@.%*2, Then type 0@.%*2Q.%z)%e)%)+%*2, Loading Compiler...0@.m)`%z)*H%*2, }0%e)0, not found0@.%*2, Change back to Pascal disk0@.%*2, Then type 0@.%*2Q.%z) }%)[+!%*2, Enter program name0@.%*2, Then type : 0%)%*2$0Q.%) $f%)@ $:b%)$@ $:b02 }%),D:%)%z)%)%)+m)`%z)*%z)%)[+%z)%),.COM%)+m)`(%z)*%*2, 0%)0, not }found0@.%*2, Check your program name0@.%*2, Then type 0@.%*2Q.%z)%)[+!%*2, Load }ing Editor...0@.%z)%C)%)+m)`%z)* %*2, 0%C)0, not found0@.%z)%)[+%*2, Type 0@.%*2Q.!%*2, Loading Linker0@.%*2,$ When Linker prompts with "*" enter0@.%*2,# your .ERL f }ile names separated by0@.%*2, commas ending with PASLIB/S0@.%*2@.%*2, Then type 0@.%* }2@.%z)%2)%)+m)`[%z)*%*2, 0%2)0, not found0@.%z)%)[+%*2, Type 0@.%*2Q }.!C/!!!!!!T!!!!T!!!!!!!!!!!!!!!!!!!!!!T!!!!T! } }LL) %*(%*)%*)%*)%*)%*%v5)$%*!)%* ,K:)$($()( }(( @) @$ (%* ,E:)($()((( @) @$ (..i5 }LL*    LL+L=+ X ҼQ T VVT@-VT }+H2) Z ҼQ V X[-$c)LLa+L+    $P %@$ (;5$h142542H2)    $P %@ } $!(@);5 उH2)LL+L,  28`8 (#(((()) ) `g/4 }2U42cd/_cᤜH2`(()b)) !.D1(( * %@ $b,@ $ }d*42 %@ & ((@ $dK$ (@@$(($H(&$(&(@)& (( & $ (& (42z };5$h4242LLC- VҼQ R TTLL^-  %*2, I/O Error #0-@.LL-L.   ,0123456 }789ABCDEF$,Q,`f2$d2O fO$-8 \@ H0T `Oຨ໹Q X  z0LL .  }!2  @(!H/LLC. $.LLT. !2  F"5(W   240.(!.W$42W }?LL.  !2  d$!. @ 4 @ !.LL.  2() $(UD1 U } @ $` 2B(  2U @$ (LLK/  2)1LLj/L/  ,CON: $(Z,LST:=,P: }$(Z,KBD:,TRM:2Z( 0 $ $~ + $d f2"F  . .C@  4AF+LL0 } d)D)$ ..LLK0 V ҼQ@ @@ D@a2@@ [2@  @(LL0   }!2  )4:࢕3:$42:""LL0   @ 0LL0    D  &$ .!2 }  F4Yn4Y$42Y888118?LLG1 !2 [2 14D4D2D$42D%%*%* })LL1  !2 [2 ` !  S $` $`0G05L5 's)3s42sUUUUZ }LL2  %*)LL$2  %*! LL72 %*(LLK2  %* LLg2Lw2L2L2       }  Ħ   @ D X5ʠBDȱEHȱI V45HIȑ }ȩȩL38 e5` X5ʠ BDȱEHȱI V08 e5` X5Hȱh }Πȩ ,3` X5LO4LO4iХiѥ8ߩL4iХiѥ8ߩ } ΠНDѝEߝHIB VHh HLH4HH8 e5HeΩh` } X5 BНDѝEΝHϝI V08 e5`LL4  LL4  LL4  }LL5  LL5 LL%5 LL35  Vʝʝ`**`*``LLp5  } L $L" L!L*"Ln#L#  $  %)%*20, file name? 0 bl%*2@.%*2,Enter .% O0,%,O0,l}G%E$}X:*lG%EX:*Z,D1:MON,Z*Z!* , D1:LINK.OVL,*N0$`P,$ERROR CHAINING TO MAIN LINKER }MODULE!*  @ @@   c$:b=, Bad switch number ":" expected(}  ($0h$9j0n $H@$0D $Ah$Fj0 $H@$AD@  C , Bad number } ,Q $Pf!Q8, Bad name to longv|$ $/ $= $. $: $, TlrNy%tN:,}|rN@y%tN0$P.,N0bbN0 R,ERROR READING FROM PROMPT FILE|rNy%,O0$*X..,lrN4%,O0$*X.%} O0$P.,@@ a0@ ( @@(  %G%G'$'%G'# 40%G,.COM $(""}S%G' ,, ,.ERL,D1:#($)&(%G ,, ,.COM,D1:#($)&( }|N% }M|N}N|N|M|M|M|M|M}M|rN%,O0,%,O0, LINKER V1.0.,$d, Length of command line }to long.`!6B a0@ `B@ @""@ $ah$zj0@$aD$A@(V} "lrN5%tN:*b5,ERROR CLOSING PRMPTFILE VlrN %GmM' TT# 4:%NTT,.CMDPC%NTP%tN}%N,%tN*N0b,ERROR OPENING %NP |rN|rNmMD}M d  |pN b$ `$,`26 } [, BAD OUTPUT FILE NAME mMmMD}M Ǥ :|Mx |pNl |M` |MT }|MH C}M|N7}N|N%GmM'&( |M  |pN4|N , BAD SWITCH: ONLY S,M,N,E},P,D,F6mM@}MmM$(d,TO MANY FILE NAMESM%}GmM' `H$:` $Dd, Bad drive number`$: `,D1: d-, Bad file name}7`$.`s`#( dg, Bad extentq` `#(` ,.ERL```` Ǵ/}u;lpNѤ7lpN4 4mMh0$%G,.COM%G bbbbb  EZ) }   LL]) %TO(%VO)%VO)%ZO)%RO)%NO%\O)$%NO!)% O ,K:)$($()(((} @) @$ (%,O ,E:)($()((( @) @$ (b,,o3LL$*    LL}@*L{*    $P %@$ (A3$h1:05:0N0)    $P %@ $!(@)A3 उN0)}LL*Lj+  08`8 (#(((()) ) `᢬-42U:0cᢩ-_cᤜN0`(}()b)) !1-J/(( * %@ $b,@ $d*:0 %@ & ((@ $dK$} (@@$(($H(&$(&(@)& (( & $ (& (:0zA3$h:0:0LL", VҼQ R }TTLL=,  8`% O  LLe, '0  @(!-LL, $b,LL, '0  F(3}(W   240,(!1-W$:0W?LL,  '0  d$!1- @ 4 @ !}1-LL4-  0() $(UJ/ U @ $` 2B(  2U @$ (LL-  0)/}LL-L .  ,CON: $(Z,LST:=,P:$(Z,KBD:,TRM:2Z( 0 $ $~ + $}d f2"F  . .C@  4AF+LL[.  d)D)$ b,b,LL.  '0 } )2:࢛1:$:0:""LL.   @ .LL.    D  &$ b,'0  }F2Yt2Y$:0Y888118?LLM/ '0 a0 12D3D0D$:0D%%*%*)L}L/  '0 a0 ` !  S $` $`0G63L3 's/1s:0sUUUUZLL0}  %PO)LL*0  %PO! LL=0 %RO(LLQ0  %RO LLm0L}0L0L0        }  Ħ   @ D ^3ʠBDȱEHȱI V45HIȑȩ}ȩL!18 k3` ^3ʠ BDȱEHȱI V08 k3` ^3HȱhΠ}ȩ 21` ^3LU2LU2iХiѥ8ߩL2iХiѥ8ߩ }ΠНDѝEߝHIB VHh HLN2HH8 k3HeΩh`} ^3 BНDѝEΝHϝI V08 k3`LL2  LL2  LL2  LL}3  LL3 LL+3 LL93  Vʝʝ`POPO`RO``LLv3 { D L6L L L L4!L!LP#LZ#L#LA$L$L^&L 'L['L'L'L(L"(L(L)L(L:+L+L',L,L,LF-L-L/LU/L/L0L0Le1L}1L2L2LA3L3L3L4L4L5  $0$P$0$X,0123456789ABCDEF$@ %0OBL?@ L?  $0&$0} lG%E$}+:lG"%E+:,D1:MONy<;9 ZҼQ%0OB,-----------------------------?y=%0}OB?y=%0OB,-----------------------------?y=%0OBy=`%0OB,Link aborted, Type ?%OB=%0O}By=%  RB%0OB,namesym=?$?y=%0OB,typesym=? %N, Error closing P%Nx%0OBy=\%0OB<, bytes written to ?%G}?y=% V dG%E$}T+:|GTbG%N, Unable to open :P%N{%G'P|G%E$}T9Tb%N,} Unable to open :P%N/%0OB?, ?y= .mMmN@mM@ mNmN@mM@ lN4x22mN }D 9mND  mND}NmNmMz<, ****** OUT OF MEMORY ******mN)   mN}NRB!$!mN) }!}N  mN b0()0.!  ,COMMON NOT SUPPORTED 8}G%G%GRB8}GlGrmG} }GmGm N@mM@}GmGmN@mM@}GmG%0OB%0OB,DEFINE PROGRAM SIZE:} ?mG~%0OBy=mG} NmN m N)mN (mNm N@}NlN4x%M@@%M@@!m N@)%M@@!mMD}N lM%0OB,ADR: ?m }N %0OB$HL?%0OB, DATA: ?mN`^%0OB,-----?qmN%0OB$HL?%0OB, NAME: ?mN$?y=lM% }0OB, END PROGRAM?y=k8%MlM@@mM)%M@@m Nm N@mM@)%M@@mNmN@mM@)lN4%M@@%M@@!mN@) |G 8!}m N@ mMRBmM@}MlMC%0OB,APR: ?%0OBy= 8mN@ mMRBmM@}MlMC%0OB,ADR: ?झ%0OB"}y= 8 lM.%0OB,ACR: ?n%0OBy=`5[$0`PmM$0(mM@}M[jmM@}M  lM/%0OB, RELOCATING #}EXTERNALS?y=mN b `lM[%0OBy=RB !  ! b! lMD %0OB, OPCODE=?!%0OB,$} CURR=?⤌%0OB, NXT=?v%0OBy=) g! 4  ,@@@@@@ $g* ( mN) |G|G}N%}}N}NmM} N} NmN}N}N$}GmG!%D}N%RO!}MmMmNmMD@[BmMmMD}M%M%MRB%M@@mM)%M@@mMmM@)%M@@mNmM&}@)%M$@@mM)|M mNmM$(@z3, ****** out of memory ******blMQmMmMDM%0OB,= ?t8}GmG`8}GlMxm'}G%0OBy=mMmG(mM@}M68}GmG'^6\6Z68}GmG%%%% % %%%%%%(}%%%%%%66lG E8 mM  LmMI%E)}T8$|@} G|G|GmM`JmN}NmMd oi %0OBy=%0OB, Total Data: ?mN%0OB,H bytes?y=%0O*}B, Total Code: ?mN%0OB,H bytes?y=%0OB, Remaining : ?~]%0OB,H bytes?y=%0OBy=%0OB,Link+} complete type ?%OB= HHHʭ O O 9@ʍ O Ohhh(`H O 8. O Oh*` O O,} O O` O =8` O 8. O O*L8 =8L8 =8L8 =8L8 =8L8ʝ` =8H =8ʪhʝ`LL8 %XO(%-}ZO)%ZO)%^O)%VO)%RO%`O)$%RO!)%O ,K:)$($()((( @) @$ (%0O ,E:)(.}$()((( @) @$ (V==sDLL9    LL9      B))A?/}B)LL9L : X ҼQ T VVTy<VT;?B) Z ҼQ V X<$c)LL1:Ll:    $P %@$ (ED$0}h1+B5+B?B)    $P %@ $!(@)ED उ?B)LL:  B8`(8 #(1}(($()) ))ᢠ>4V+Bbᢝ>^b;LL;L;  B8`8 (#((((2})) ) `ᢠ>42U+Bcᢝ>_cᤜ?B`(()b)) !%>;A(( * %3}@ $b,@ $d*+B %@ & ((@ $dK$ (@@$(($H(&$(&(@)& (( & $ (& 4}(+BzED$h+B+BLL|< VҼQ R TTLL<  %0OB, I/O Error #?LL|= $V=LL= B  F,D(W   240=(7}!%>W$+BW?LL=  B  d$!%> @ 4 @ !%>LL(>  B()8} $(U;A U @ $` 2B(  2U @$ (LL>  B)ALL>L?  ,CON: $9}(Z,LST:=,P:$(Z,KBD:,TRM:2Z( 0 $ $~ + $d f2"F  . .C@ :} 4AF+LLO?  d)D)$ V=V=LL? V ҼQ@ @@ D@XB@@ RB@ ;} @(LL?   @ ?LL?    D  &$ V=B  FCY⢌CY$+BY88811<}8?ʠHL#AqЊqѠiȱiH8L#Aȱ BL=}AȑююSqЊqѠ8ҊӠѥ8ҰӥL#AH8L&A oDh>}ʝ`LL>A B RB 1CDDDBD$+BD%%*%*)LLA  B RB ` ?}!  S $` $`0G:DLD 's Cs+BsUUUUZLLB  %TO)LLB  %TO! @}LL.B %VO(LLBB  %VO LL^BLnBL~BLB         Ħ   @ A}D bDʠBDȱEHȱI V45HIȑȩȩLC8 oD` bB}Dʠ BDȱEHȱI V08 oD` bDHȱhΠȩ #C`C} bD BНDѝEΝHϝI V08 oD`LLC  LLC  LL D  LLDD} LL/D LL=D  Vʝʝ`TOTO`VO``LLzD LF-L-L/LU/L/L0L0Le1LdSUQe M%9&*TUHOUTPUT"e54T0@CURFIB$D(P@HERR&te$TTĘ@ENDFRE)t%ED(@TFN&:F}Sf 0|@``0^((K'KB.HxDJ Da.DDHJE"\ 8"Xxp7/!KXH8 G}i(p7Cp7*@ l&%H2D3($$ E'$M"X}U$3p$"f(y 3pE 0P[DSP[DP7b  "f,(nD䢻@ JAll@Y}l  +EYR %= b ŀH)H7(#Ę9\RD$)Sјh誑6Z}ih IQ hQ` 8ђSPI` 1=MCLOSEDJ0&0 1$ @&X@48a[}0q(`nD@@n67B@`ƢB`Q KER Rd44TI8  Hq7 @  H7\ +p$#\}@Uq8\ C4f$T*Jzd ''d2Jz*e3CP =Af*&:f 0|  H9$Q# s]}\ 9T@G* r&8S BT580i}Q;!b4(b$(rG(9x2ePV(S!bPR(R!"S2@L &G2(IbU"(ahL9SP(R!bPrd}QV$G* r08x$S!BK"s4'3EJ:@(ViZ@VAL@ !D/hEBe'@eH:# 9 2c=M%=Ip}ԒUSeD0 ]9 *&:Ӑ 0|  H9΢M soK sb(snvLB ^ Dt(Ș@SFB}ԓ%E@I9 *&: 0|QTj  H  HQ @(T TN}M)SFL*Jzd#)'!FC":2d !!)FI::*Dd\&"ԒUPeG]9 *&:Ӑ 0|QTj  }$r7H  0"@&FX@$ :HEnA $ uQ D$@ @PT@PTZSFX*Jzd0 #!FW}*2re$ !FT2Bd\&"UP%A0M *&:ѐ 0|Rt5U$d)UP%A0 }*&:ѐ 0|Ht5U$d)USԑeA@M%=J*&:PSԦ 0|(SFC"JzSԑT%}A0%=IMV*&:SԑTf 0|HD)S APUB*&:T& 0|@p)U}PT%H89^@DSPPT`dTd5aY*&`L 0&`1@$ rL D Tp}> ABPB$B\C`0A"B" jP 8>@! kR%!-n.BD!0|  0 \[>!A}8hC!r[! KX'$g(RrD"\4@@R?@1H w2,0H`$2)/`h-T}h@Z6!M1^F$„KMD"0H1P Tj !y $@'p! ABZ *3ESDB  m p!}D AJR.r@4t`& F@`@ A! @9P RɁHSK_-hAJRr@4tl $""G`(%}DE5  H 8& ҠW?DdB  j$*5qT@$q8h`FILLCH@} E@R-'q8/""NSNєU`Te$(I9T5rfR*G* t,Q G'H5abNl9:I F 4`"UUbU}/I5a"^@l9G4*G2 9@TR(BG+ H 1S2 IF1 `m i)H3ѕԐU`Tes(\} @FWNBM[ QʥH-:Brtd,Q( @X!bN@bUH0@e3 fQ!@XBg9@TR(B}G)B `Tes(@@FW1BATet(0@S0FIBd4$te%5E$yPdz![·BB  t!BJdU$nŊ}9hTeP(HR g@V8tPH &W0+80i!Z Vyh[ÇH TPbPR,UbU)Z JN@jVtT !g"`} QʣBUzHHI5RuH DC80HE "TT8ШS2 f(Q 8QT`det%P}Hz!Y΅ g2^V  TӤ "ԭg'I5+=:I F U @`det%@S0FIBd4$}Ԕ%A@ IMQI*&:Ԕ 0| ' SNTH%A` ]If*&:Tf 0| ' }~ӀԐ%A I !J*&:Ԑ 0| pU%A Q "*&:U& 0|}p%A0 ] !J*&: 0|RU%@ ]%R*&:RU& 0|~Ӏ}S%@ ]=2*&:S& 0|~ӀSS 5Ptz:fP( *g"e22a8TPd3d})P4Z!Q 怀!Q@S0FIBt5U$d)TSԐ`d4$P#M%=I2SԧTU d4UEeIP \ }BB  t)PVhZVij"3g#p!bF BŜ` Vp`B'3=[@J9[-nd$ZL@ 2-"e&0G}@2*ВUQd4$$HMQ %RSHLeE5D$IP\@  @/@aH<BB  }t!F W`$9"t/h%,3( Eg:g$YfQAH{@9t/h bhU eTȚS):*@ }2!0/gC0 c h=Ӡ YhI*ji Q@ 8єSStDe P )*SՑT}tdU5DP08\z#pz#p V*rQ݀7ve2:+pte2D B@ fS)[2'@ e}*p@Bp7$[!PBPnF*ۀ@̀Vؠä &&l p [2"J*}+`\V:`tdU5D@BTTMPRDdh@MVRҕPt%$8 ==1 6@BSRD44 =:@DIFUDU8N@I}NNS D4(1 @LESS DT5Y2@MVRTD5E(MQI 6@UDVSQ DTU9&@WORDCMԑSe@U@`l>Lɂ0H& }P|-`>LɃ0x&|E a,>L'Ʌ0&|] a>L3Ɇ0t%$8@BOOLCMD%5(@BSSD44(@C}ONDDhH@DIVDU8@GESD@INTD4(X@LBADU8x@MODDT@MVLDe(P@NESD5E(@STRGCM}DTEh`@UMDDT@UNItt$D4@WORDUMS%@!1R*&:& 0|lSѓQe@@9}56*tTDT`L& 0|SNt$D4@WORDUMS%@!1R*&:& 0|lSѓQe@@}956*tTDT`L& 0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000}00000000000000000000000000000000000UTPUT"e54T0@CURFIB$D(P@HERR&te$TTĘ@ENDFRE)t%ED(@TFN&:#ԕPS%O0(]I2*&`1C$ @'LD Q n& @$]8bA\ . òQV qH6 $}ji  H0:@&, H` 0@ :"ˆ%` `  QS 0GyBx  Q(DHHSGC"d4@$ !0+p} = T!}3@E\"@$+F$R( HJ@H0LR'@emN@̦R  !Ie* j `T L} +)Te/@dˀh=Ṭ*h@D2-@tL4\ 0z 2"E D fP&^`C2 2,8 }6ɗLHAc $1z O    `^Vz!Z3)J$*V%4PE+T4Qe,p _(0i* 2}R@@"j_H RI/H C2 ʙ @@1YÀ)ZW@ &p@&r6\!4j /K@X -J /@< , @$} , , , 2뀪@ RtT1An &'@ LN- 1:Zbt $An@I&'@ $LN}/1:PPbt*h i6T̤ Am@P Am@ I +QJ$ +UR2 E ER12" 2!}I0z `\Pe[eS#  t/@d+ @ W)\ @8H/UJd TR%HA &_p!Rj,pAS@}AI0i Rx/+Jd  R \W@pJWtRS1;DTT@11R:cAIJ;T1QJ:^SU#11J;r} 19J:#@A=AH;QA=R:#@AH;AM!H;P@I;}I1Mj;S}# I9;УMH:xTS#UQIU92U'Аӕ%Fp( 9Y *&`L 0!P"<@"}B0A"B$> @P`hP0y $>ANW0y` @r@Ǔ" $ 0` }b@@` SLDHAI:IHV@01:%! :!@  ` b& ! Ę $ /,yB@{0} % %1BC0>yBGvRIt ` @  0(vJ!AY@` H` , i!q:HHE1& L OH}(  fH$   ` JC0irHH0" (dLD H)H]$ $1* p:0MiHh@}>$A@c@1&oHA:@q )@H &R_@ HH-0& GH' $ `R= X(x?A` xI8Z!y"ZpHyp6$ H@Ę>+%"R%!`:QX.'0r7b@` 2$FlH #a|!}n܍؀H  P%QZ0X[.(r7 @)@K"K".$xDH!K Bꈫ > pPQWP-y*!} *%O!`:Q\P-Mx( @ HA a)%AFP! ,PnB." `1= Qb8 @H( !}!U)b\P!k$ 7pnq@ <"\D%M i*)>@ J:BU$@0|  !!Q(!}\"+%@ \ Gp$K**R)SGI"2JbdĔ@$%@H H`J@q@#\D%!}y\ BM'iȓ> @$  F@! P%1@xb@N6 9B#p@!$B4t"'LJ`a !}j#NE r:ZQf%0|  hPTRIG` NRp)`MQ% .bh H(Jx9HHU5E!}$y  *  3nS6= QQ5AJ2FUT+YI]I%R2UU# Y%=IMV2Pc*YMM%:p!}!} 0&`L 0&`L @ SJp) *(* AS OF 10/21/79 *)PROGRAM CALCULATE;CONST RCONST = -2.5; RCONST1= 65535.5;VAR R1,R2,TEMP:REAL; X : ARRAY [1.%}.2] OF REAL; CH1,OP:CHAR;(*$ID1:STDPROCS*)FUNCTION SUBREAL(R1,R2:REAL) : REAL;BEGIN SUBREAL := R1 - R2END;PR%}OCEDURE ADDREAL(VAR R1:REAL; R2:REAL);BEGIN R1 := R1 + R2END;PROCEDURE TF(B:BOOLEAN);BEGIN IF B THEN WRITELN('%}TRUE') ELSE WRITELN('FALSE')END;PROCEDURE CALC;BEGIN CASE OP OF 'S': BEGIN INLINE($FD/$09);%} WRITELN(SIN(R1)); END; 'C': WRITELN(COS(R1)); 'A': WRITELN(ARCTAN(R1)); 'L': WRITEL%}N(LN(R1)); 'E': WRITELN(EXP(R1)); '+': BEGIN ADDREAL(X[1],X[2]); WRITELN(X[1]:10:3) END; '-': WRITELN(SUBRE%}AL(X[1],X[2]):10:2); '*': WRITELN(R1 * R2); '/': WRITELN(R1 / R2); 'M': WRITELN(-R1); '=': TF(R1 = R2%}); 'N': TF(R1 <> R2); '$': WRITELN(SQRT(R1):10:3,SQRT(R2):10:3); '<': TF(R1 < R2); '>': TF(R1 > R2);%} 'Z': TF(R1 <= R2); 'G': TF(R1 >=R2); '1': WRITELN(SQR(R1),' ',SQR(R2)); '2': WRITELN(R1 + 1); '%}3': WRITELN(1+R1); '4': WRITELN(TRUNC(R1)); '5': WRITELN(ROUND(R1)); '6': WRITELN(RCONST); '7': WRITE%}LN(RCONST1); '8': BEGIN R1 := -2.234; X[1] := 3.456; WRITELN(R1,' ',X[1]); END; END;END; (* CALCULATOR *)PROCED%}URE MENU;BEGIN WRITE('S:SIN '); WRITE('C:COS '); WRITE('A:ARCTAN '); WRITE('L:LN '); W%}RITE('E:EXP '); WRITE('1:SQR '); WRITELN('$:SQRT '); WRITELN('+, -, *, / ARITHMETIC OPERATORS'); %} WRITELN('M:NEGATE'); WRITE('= : EQUAL '); WRITELN('N : NOT EQUAL'); WRITE('<:LESS THAN '); WRITE%}LN('>:GREATER THAN '); WRITELN('Z:LESS THAN OR EQUAL TO'); WRITELN('G:GREATER THAN OR EQUAL TO'); WRITE('4:%}TRUNC '); WRITELN('5:ROUND');END;BEGIN (* MAIN PROGRAM *) REPEAT WRITE('ENTER FIRST OPERAND? '); READ(R1%}); X[1] := R1; WRITELN('R1=',R1); WRITELN; WRITE('ENTER SECOND OPERAND? '); READ(R2); X[2] := R2; WRI%}TELN('R2=',R2); WRITELN; WRITELN('ENTER OPERATOR:'); MENU; WRITE('? '); READ(OP); WRITELN; CALC; %}WRITELN('TYPE TO STOP'); READ(CH1); UNTIL CH1 = CHR(27)END. 65535.5;VAR R1,R2,TEMP:REAL; X : ARRAY [1.$LAPX-20102DISK 1 PASCAL/LINKERATARI INC.03/05/8285IL CH1 = CHR(27)END. 65535.5;VAR R1,R2,TEMP:REAL; X : ARRAY [1.(6OCEDURE ADDREAL(VAR R1:REAL; R2:REAL);BEGIN R1 := R1 + R2END;PROCEDURE TF(B:BOOLEAN);BEGIN IF B THEN WRITELN('%}TRUE') ELSE WRITELN('FALSE')END;PROCEDURE CALC;BEGIN CASE OP OF 'S': BEGIN INLINE($FD/$09);%} WRITELN(SIN(R1)); END; 'C': WRITELN(COS(R1)); 'A': WRITELN(ARCTAN(R1)); 'L': WRITEL%}N(LN(R1)); 'E': WRITELN(EXP(R1)); '+': BEGIN ADDREAL(X[1],X[2]); WRITELN(X[1]:10:3) END; '-': WRITELN(SUBRE%}AL(X[1],X[2]):10:2); '*': WRITELN(R1 * R2); '/': WRITELN(R1 / R2); 'M': WRITELN(-R1); '=': TF(R1 = R2%}); 'N': TF(R1 <> R2); '$': WRITELN(SQRT(R1):10:3,SQRT(R2):10:3); '<': TF(R1 < R2); '>': TF(R1 > R2);%} 'Z': TF(R1 <= R2); 'G': TF(R1 >=R2); '1': WRITELN(SQR(R1),' ',SQR(R2)); '2': WRITELN(R1 + 1); '%}3': WRITELN(1+R1); '4': WRITELN(TRUNC(R1)); '5': WRITELN(ROUND(R1)); '6': WRITELN(RCONST); '7': WRITE%}LN(RCONST1); '8': BEGIN R1 := -2.234; X[1] := 3.456; WRITELN(R1,' ',X[1]); END; END;END; (* CALCULATOR *)PROCED%}URE MENU;BEGIN WRITE('S:SIN '); WRITE('C:COS '); WRITE('A:ARCTAN '); WRITE('L:LN '); W%}RITE('E:EXP '); WRITE('1:SQR '); WRITELN('$:SQRT '); WRITELN('+, -, *, / ARITHMETIC OPERATORS'); %} WRITELN('M:NEGATE'); WRITE('= : EQUAL '); WRITELN('N : NOT EQUAL'); WRITE('<:LESS THAN '); WRITE%}LN('>:GREATER THAN '); WRITELN('Z:LESS THAN OR EQUAL TO'); WRITELN('G:GREATER THAN OR EQUAL TO'); WRITE('4:%}TRUNC '); WRITELN('5:ROUND');END;BEGIN (* MAIN PROGRAM *) REPEAT WRITE('ENTER FIRST OPERAND? '); READ(R1%}); X[1] := R1; WRITELN('R1=',R1); WRITELN; WRITE('ENTER SECOND OPERAND? '); READ(R2); X[2] := R2; WRI%}TELN('R2=',R2); WRITELN; WRITELN('ENTER OPERATOR:'); MENU; WRITE('? '); READ(OP); WRITELN; CALC; %}WRITELN('TYPE TO STOP'); READ(CH1); UNTIL CH1 = CHR(27)END. 65535.5;VAR R1,R2,TEMP:REAL; X : ARRAY [1.$LAPX-20102DISK 1 PASCAL/LINKERATARI INC.03/05/8285IL CH1 = CHR(27)END. 65535.5;VAR R1,R2,TEMP:REAL; X : ARRAY [1.(6OCEDURE ADDREAL(VAR R1:REAL; R2:REAL);BEGIN R1 := R1 + R2END;PROCEDURE TF(B:BOOLEAN);BEGIN IF B THEN WRITELN('%}TRUE') ELSE WRITELN('FALSE')END;PROCEDURE CALC;BEGIN CASE OP OF 'S': BEGIN INLINE($FD/$09);%} Type 0@.%*2Q.!%*2, Loading Linker0@.%*2,$ When Linker prompts with "*" enter0@.%*2,#.}N(LN(R1)); 'E': WRITELN(EXP(R1)); '+': BEGIN ADDREAL(X[1],X[2]); WRITELN(X[1]:10:3) END; '-': WRITELN(SUBRE%}AL(X[1],X[2]):10:2); '*': WRITELN(R1 * R2); '/': WRITELN(R1 / R2); 'M': WRITELN(-R1); '=': TF(R1 = R2%}); 'N': TF(R1 <> R2); '$': WRITELN(SQRT(R1):10:3,SQRT(R2):10:3); '<': TF(R1 < R2); '>': TF(R1 > R2);%} 'Z': TF(R1 <= R2); 'G': TF(R1 >=R2); '1': WRITELN(SQR(R1),' ',SQR(R2)); '2': WRITELN(R1 + 1); '%}3': WRITELN(1+R1); '4': WRITELN(TRUNC(R1)); '5': WRITELN(ROUND(R1)); '6': WRITELN(RCONST); '7': WRITE%}LN(RCONST1); '8': BEGIN R1 := -2.234; X[1] := 3.456; WRITELN(R1,' ',X[1]); END; END;END; (* CALCULATOR *)PROCED%}URE MENU;BEGIN WRITE('S:SIN '); WRITE('C:COS '); WRITE('A:ARCTAN '); WRITE('L:LN '); W%}RITE('E:EXP '); WRITE('1:SQR '); WRITELN('$:SQRT '); WRITELN('+, -, *, / ARITHMETIC OPERATORS'); %} WRITELN('M:NEGATE'); WRITE('= : EQUAL '); WRITELN('N : NOT EQUAL'); WRITE('<:LESS THAN '); WRITE%}LN('>:GREATER THAN '); WRITELN('Z:LESS THAN OR EQUAL TO'); WRITELN('G:GREATER THAN OR EQUAL TO'); WRITE('4:%}TRUNC '); WRITELN('5:ROUND');END;BEGIN (* MAIN PROGRAM *) REPEAT WRITE('ENTER FIRST OPERAND? '); READ(R1%}); X[1] := R1; WRITELN('R1=',R1); WRITELN; WRITE('ENTER SECOND OPERAND? '); READ(R2); X[2] := R2; WRI%}TELN('R2=',R2); WRITELN; WRITELN('ENTER OPERATOR:'); MENU; WRITE('? '); READ(OP); WRITELN; CALC; %}WRITELN('TYPE TO STOP'); READ(CH1); UNTIL CH1 = CHR(27)END. 65535.5;VAR R1,R2,TEMP:REAL; X : ARRAY [1.$LAPX-20102DISK 1 PASCAL/LINKERATARI INC.03/05/8285IL CH1 = CHR(27)END. 65535.5;VAR R1,R2,TEMP:REAL; X : ARRAY [1.(6OCEDURE ADDREAL(VAR R1:REAL; R2:REAL);BEGIN R1 := R1 + R2END;PROCEDURE TF(B:BOOLEAN);BEGIN IF B THEN WRITELN('%}TRUE') ELSE WRITELN('FALSE')END;PROCEDURE CALC;BEGIN CASE OP OF 'S': BEGIN INLINE($FD/$09);%} Type 0@.%*2Q.!%*2, Loading Linker0@.%*2,$ When Linker prompts with "*" enter0@.%*2,#.}N(LN(R1)); 'E': WRITELN(EXP(R1)); '+': BEGIN ADDREAL(X[1],X[2]); WRITELN(X[1]:10:3) END; '-': WRITELN(SUBRE%}AL(X[1],X[2]):10:2); '*': WRITELN(R1 * R2); '/': WRITELN(R1 / R2); 'M': WRITELN(-R1); '=': TF(R1 = R2%}); 'N': TF(R1 <> R2); '$': WRITELN(SQRT(R1):10:3,SQRT(R2):10:3); '<': TF(R1 < R2); '>': TF(R1 > R2);%} 'Z': TF(R1 <= R2); 'G': TF(R1 >=R2); '1': WRITELN(SQR(R1),' ',SQR(R2)); '2': WRITELN(R1 + 1); '%}3': WRITELN(1+R1); '4': WRITELN(TRUNC(R1)); '5': WRITELN(ROUND(R1)); '6': WRITELN(RCONST); '7': WRITE%},PROGRAM ADD(INPUT,OUTPUT);VARA,B,C:INTEGER;BEGINREADLN (A);READLN (B);C:=A+BWRITELN ("THE ANSWER ",C)END.pp  0r