Home

60 programmes pour CASIO PB-100

1. 10 secondes Q Piquet 5 secondes Sapin perdu 5 Pour rejouer presser O ENCORE OIN sinon N KEY Programme LIST 48 6070 za 18 PRINT xsSi ALO 58 PRINT sesPerT Besa Vac sss t PRINT 28 PRINT NIVER 58 IF KET THEN 3 t PRIMT 58 38 KEY IF f l TA B0SUB 248 1 IF 2 3 g VRL C Egem 4 6070 58 88 F5 0 8s el OR 2 1 TO De28 O LNT RANEI 38 C INT RANEH 1F C K THER 38 188 FOR L 1 19 4 118 PRINT CSR NE SR MEXSSCSR NiX KER stats NEKO 128 PRINT IF Ken T REM 298 138 IF KGN THEN 299 148 IF KC THEM 318 49818 158 IF KEY 2 tsIF kana 158 IF KEY SKK LIF 9 K29 178 REKT Li 1 88 zINT RANES Exemple 188 IF 2 21 N 1 198 F D StII EN SNJ 288 IF 12 251F 12 5 SIF Gee js 4 118 IF MARS 228 IF NAME 238 WEXT Z 248 POINT s RgRlyt Etes PRIZ Kiza CRRMA az 258 PRINT ENCORE ZW 2 1 1PRTNT 258 IF KEY 0 THEN 8 278 IF EY Wi PRIN 298 PRINT ss hECOR ees t gel IF 2 9080B 248 6 TO 238 388 PRINT 3 SORTI Ste ss TERMIN Ciss 5010 258 z 148 finer c6iMET 47 418 PAS DEFM 0 MODE 8 Pr sentation Apr s la chasse aux mouches voici la chasse aux moustiques o l on voit deux fourchettes remplac es par une simple tapette mais les r flexes sont toujours sollicit s Mode d emploi 1 Choisir le niveau de 1 3 KEY dont d pend le temps d affi chage des moustiques 2 La tape
2. 38 SE IF fal INEXT P 238 T 5 0 8 60508 Q IF aguz 138 v V 18 IF 8123 1T26 U27 GOSUB i80T0 58 356789 THEN 38 FE 48 6010 74 148 PRINT aaah 248 T 5088 9 SA FOR M71 TO FAI F es ESSAIS 1Te7 0 8 60508 WAMEWEKA Y SG RETURN 8 FOR 2 1 TA Zika 158 PRINT ENCORE G 158 R AUD RCOD A QU INT ia FA 9RINT 1 8GDSRSRETURN CHIFFRES Semple sIVEM 1 9 5 4352156799 451236189 7 151287633 3 215487639 4 215489167 5 264519361 5 21548936 7 451289367 351267987 9 151267895 18 462157893 11 Lic HLUNISSHEE 379 PAS DEFM 0 MODE 8 Pr sentation Retrouvez les joies de la conduite spatiale grande vitesse gr ce ce programme d alunissage en temps r el Mode d emploi 1 Affichage de PRET Le jeu commence la pression d une touche quelconque KEY 2 l s agit donc d alunir sans encombre et pour ce faire plu sieurs commandes sont disponibles soit Q pour d c l rer KEY soit P pour acc l rer KEY 3 Pour s aider on se r f re l affichage qui indique successive ment le nombre de litres de carburant restant l altitude la vitesse et l acc l ration 4 Un alunissage r ussi doit se faire moins de 6 mis 5 Pour rejouer presser O ENCORE OIN sinon N KEY Programme LIST 58 822 81 V V4Re5 H 18 PRINT RLUNISS zn C C ian Bae 12 178 58 IF CAB PRINT P 18 ii yeiai anne sechel t t INT RAM Se 2508 2 6070 128 1iC INT cHe 542 TA PRINT Cit C5R 88 5
3. Mode d emploi 1 Entrer les bornes inf rieure et sup rieure correspondant l intervalle de calcul EXE 2 Pr ciser le pas de calcul des points de la courbe EXE 3 Affichage des coordonn es X et Y de la fonction plac e en ligne 50 Y SIN X Cette derni re peut tre remplac e par une autre fonction exemple Y 10 COS X 2 4 Pour une autre fonction presser O ENCORE ON sinon N KEY Program LIST 78 PRINT ENCORE 0 me 18 RINT ssFOMETI fW 2 PRINT Dies RC 28 IF KfY n THEN 28 PRINT INTERVAL 18 LE 98 IF KEYS N IPRTN 38 INPUT SORME IH TottefND fot RORNE SU 186 5010 38 POtZS PRS t d FOR X 10 231 ge SEISIN X Exemple aFONCTIONGS X 1 141592654 1 INTERVALLE 3 019923232755 BORNE INF X 1415926536 E 7 9 882471255487 30RME SUP 7 i 4 6584873464 Y 1 4 81498147484 340 PAS us 2 Fe cs t DEFM 0 23141696 Yo xc 2 350487 46 F MODE 7 8 3 5488366515 3 84986192172 4 z 1 141592654 CNCOREIDAM Pr sentation 3 8373691482 Ce programme se charge de calculer les volumes suivants cube parall l pip de rectangle cylindre sph se pyramide Mode d emploi 1 Choisir l option correspondant au volume calculer KEY soit 1 CUBE 2 PARALLELEPIPEDE RECTANGLE 3 CYLINDRE 4 SPHERE 5 PYRAMIDE 2 Entrer les donn es permettant le calcul du volume EXE 3 Affichage du volume EXE pour continuer 4 Soit O pour un autre calcul ou N KEY
4. Programme 38 SEV IF dati IF 2 S 12 VRU C 51 86T0 751848 4 STO 38 SR INPUT C TE 2Y C 3 6070 4 58 eur LONGUEUR ile LARGEUR sH HAUTEUR H iYe 16010 70 INPUT RAYON R HAUTEUR shi COMAS 88 I RAYON E ami KOTA Exemples VOLUME 3 444312 ERCORES AN davit MER kui LONGUEUR 7 158 LARGEUR SRUTEUR Ls 70 38 INPUT BASE HAUTEUR r y 21454884 188 PRINT VOLUME p ENCORE ON RE re UWMVASO QUE 1 58 IRURE 2 344117 ENCORE DH iik IF KEY 0 TREN 18 128 IF pYetwnioeIN T ttEBD 178 5070 116 ist MER tS LONGUEUR 1 58 LARGEUR 3 HAUTEUR F 7 7 v LUME 185 5447 fRCORE Q N apay UMEN iue RAYON VRUNE 361 SCORES DAN 7 296 PAS DEFM 0 MODE 7 8 Pr sentation Ce programme permet de calculer les surfaces suivantes carr cercle cylindre cube et sph re Mode d emploi 1 Choisir l option correspondant la surface calculer KEY soit 1 CARRE 2 CERCLE 3 CYLINDRE 4 CUBE 5 SPHERE 2 Entrer les donn es successives n cessaires au calcul EXE Affichage de la surface EXE pour continuer 4 Pour effectuer un autre calcul presser O ENCORE ON sinon N KEY 2 INPUT Ru Programme ut 2 ka wadi a PUT RAYON s 148 PRINT MAKE ST SERIE S7 18 POINT zaGURFRC ai za PEINT ts PRINT 38 se Ir IF Sani Zali 516010 aj n 48 SI
5. fi S eeRt2 BUT 71 Exemples LV eSURFACESSS 475 TURFACE 3583 21777 ua SURFACE 7 ENCORE GUN FASERFACE Sex 4 5 i COMVER 486 PAS DEFM 0 MODE 7 8 Pr sentation Ce programme convertit toutes les temp ratures des unit s suj vantes Fahrenheit Celsius Kelvin R aumur Rankine Mode d emploi 1 Entrer par KEY les deux options de conversion Le premier chiffre indiquant l unit de d part et le deuxi me celle d arri v e 1 FAHRENHEIT 2 CELSIUS 3 KELV 4 REAUMUR 5 RANKINE 2 Pr ciser la temp rature convertir EXE 3 Affichage de la conversion dans l unit choisie en 1 EXE pour continuer 4 A la question ENCORE OIN r pondre O pour un autre calcul sinon N KEY Programme LIST Ja F R 1 8 70 1 18 PRINT TEMPERAT 48 XEYTIF fj URES 168 IF SSL 28 PRINT 2 3 4 RLODINEXT 1 60 4 t sPRTRT 73 288 73 t8 GUT 44 S INPUT FRREMMEI T 8 80T0 C 78 INPUT CELSI RTAS 2 8070 C ZA INPUT KELVIN TRE T 273 15 3 9 5 432 6079 zeori 88 INPUT SAME F 7 R21 459 58 74 118 PRINT FREENMET Tz 8t80T0 f 128 240323904579 PRINT CELSIUS ESSOTO M 178 F F R 32 805 9 PR F i58 een UA t1 ER TNT 118 F KET 0 THEN K 34 LA KEY WT PRIN PA D LS FE LETT ERSIUFI UE FORCE 385 PAS DEFM 0 MODE 7 8 Pr sentation Ce programme permet
6. 38 2 PROGRE 6070 78 58 6070 58 38 ASCS CIRCUIT 78 IF 2 1 88 INT 1BR A ZI RIVIERE RRMSS 0 6010 18 5 70000U ua 5 38 ORDIMATEURES QULEMENTEXPOSIT Ion o IF RANE SSES 148 PRINT CSR 140 288 iF KEY 0 THEM ATELLITESCARNRS NEXT 1 60 18 SIERPROPULSEUR 70 i78 218 IF KEY N PRIN 198 HINT RRMAe3 S 158 S S 1 F 548 TH T s ED IBID 18 EX 238 228 5010 zaa 168 G TO 38 238 PRINT PRINT 118 9 122LE8GD 2 2 178 PRINT PRINT PERDU 20 5 2 PRINT i TERNINE A 80TO 199 128 iF i l T 158 PRINT REUSSITE Bp LEM S mem 128 IF KEYSIDCI D 198 PRINT ENCORE U THEM 58 ZA PRTMT emple MORCTYLOSS SETERMTWE NIVERV 1 2 SEUSSITEsS 784 t ENCORE Q N ZNILOUS Li LOS dius Lus Ww E 8 360 PAS DEFM 0 MODE 7 8 Pr sentation Se jouant deux le pendu consiste pour l un des joueurs retrouver le mot secr tement s lectionn par son protagoniste et ceci en proposant un nombre de lettres inf rieur celui initia lement choisi Mode d emploi 1 Entrer le mot d couvrir 7 lettres EXE 2 Pr ciser le nombre maximum d essais permis EXE 3j Le programme affiche le nombre d essais encore disponibles ainsi qu un nombre d toiles correspondant au nombre de lettres restant d couvrir 4 Le joueur qui cherche le mot indique une une les lettres suppos es KEY 5 Si le mot est trouv avant l puisement du nombre d essais le jo
7. 64 IF CYX IPRINT 3 neei iZ ii t 78 6070 5 Exemples M 100 200008 aux 15 ois iere annee Prix du materiel 1 4 ONTRMT SOLDE lere annee 56 258008 Prix du materiel D Tau 28 Mois lere annee EL RONTANT 7 SOLDE annee i 11908 252888 annee 2 12888 21608 annee 3 M 144888 annee 4 annee vwd ariz N saterie AOUR TISSENEMTS pu HE A 289 PAS DEFM 0 MODE 7 8 Pr sentation Ce programme calcule le nombre d ann es d amortissement les amortissements annuels ainsi que la valeur comptable nette apres amortissement Mode d emploi 1 Indiquer le prix d achat du mat riel EXE 2 Pr ciser le taux d amortissement constant que le programme convertira automatiquement en taux d gressif EXE 3 Entrer le nombre de mois de la premi re ann e d achat si celui ci a t r alis en cours d exercice EXE 4 Affichage des r sultats pour chaque ann e EXE pour conti nuer Programme LIST 5 WC SET Fa 18 INPUT Priz du zateriei f Ta vi Bi neis jer e atmee t 28 E 8 188 9 L 8O 1 Cs 122IF KC 2 87892 5 38 iF B Bo 48 IF 9 25 B 375 58 PRINT MONTANT 2 SOLDE 88 IF CCo 38 J HALIF Cz TR EET 88 r jv8 129 J 1 ft 98 E PRINT an neetip pit Zi 188 F IeBrIF Ec J J F 6070 o0 t8 IF 6 2 F J 26 Hem JJF oro 98 128 S070 5 Exemples Prix du materiel Eu Taur 5 Mois lere annee
8. MERD SVSTERIES 60 PROGRAMMES POUR CASIO PB 100 et FX 802 TANDY PC 4 OLYMPIA OP 544 Jeux math matiques vie pratique comptabi lit utilitaires graphismes Chaque proaran me est accompagn d explications et d un exer ipie d utilisation Pour vous exercer l e ji des diff rentes fonctions un tableau vou lique les programmes o elles sont utilis e Quelques programmes m Slot machine B Divination m R flexes W Boule panique B Fonctions m Conversions W Amortissements W Factures int r ts B Tri et classement E Sinusoides ISBN 2 85535 064 6 MAC B POCHE informatique G PROBST PROGRAMMES POUR CASIO PB 100 60 PROGRAMMES POUR A Collection ere POCHE INFORMATIQUE dirig e par ALAIN TAILLIAR directeur de la r daction de MICRO SYSTEMES 60 PROGRAMMES POUR CASIO P B100 FX 802 TANDY PC 4 ET OLYMPIA OP 544 COLLECTION E T S F MICRO SYSTEMES 1 A VILLARD et M MIAUX Un microprocesseur pas pas A VILLARD et M MIAUX Syst mes microprocesseur P GUEULLE Maitrisez votre ZX 81 E FLOEGEL Du Basic au Pascal P COURBIER Vous avez dit Basic M MARCHAND Vous avez dit micro P GUEULLE Pjlotez votre ZX 81 M JACQUELIN La micro informatique et son A B C M OURY Maitrisez le TO 7 P 2 3 4 5 6 s 8 9 0 P GUEULLE Pilotez votre ORIC COLLECTION POCHE INFORMATIQUE G ISABEL 50 programmes pour ZX 81 P
9. SOLDE 102 Prix du materiel E Taux 7 Sois iere annee TNT SOLDE annee 33758 7 486258 annee 2 152144 253386 nee 215 158691 annee 4 1934 793 annee 5 TME EN ir ME LUMS Pr sentation 291 PAS DEFM 0 MODE 7 8 Ce programme permet de calculer les annuites d un emprunt dont les amortissements sont constants savoir dette totale divis e par le nombre de p riodes Mode d emploi 1 Entrer le montant total de l emprunt EXE 2 Pr ciser le nombre de p riodes de remboursement EXE 3 Indiquer le taux d int r t EXE Dette en d but de p riode Int r t de la p riode Amortissement Annuit 5 Affichage final de Nombre de p riodes total Emprunt total Total des int r ts KEY 4 Affichage pour chaque p riode des r sultats suivants 6 Pour un autre calcul pr ciser 0 ENCORE ONN7 sinon lt N 103 Programme 17 5 RC SET N 18 INPUT aerunt TN periodes b Interets 5 28 TET MSMODE 7 FD R iei TO N PRIN T PRINT PERI ODE J 6ET F 38 PRINT DETTE T r INTERET Te BHORTIS M R MAUITE 1 A4 Tai Ja HAHA lia ET MIMEXT J PRI NT Hs PERIODES SET F2 Sa PRINT EMPEENT ndr INT roo 58 PRINT PRINT E NCORES Q N TR IF KEY D PRIN T 8070 5 38 IF KEY amp W THEN 78 38 PRINT EMD feerunt guine Hh reriodes interets 3 8 104 2PERIODE 4 DETTE 23
10. 3 A la question ENCORE O N r pondre O pour retourner en 1 r pondre N pour arr ter KEY Programme LIST 9B PRINT MEXT L P 18 PRINT sers DES RINT ess RAGE fat m 28 INPUT DES i 28 FOR C TOA 18 SAIF Rail 108 PRINT art F Aci THEN 48 P CYEMENT C za 6970 20 118 PRINT ENCORE 0 8 FR 1 1 70 8 AA tS PRINT SR FOR L L TO INT 128 iF KEY 0 THEN Rast 4 G PCL INT PAS 128 IF KEY N PRIN amp e1 PRINT PC T UEND T8 FOR Ks TO 2N 148 50T0 128 EXT amp MEXT L 434 DES ca XS 1 18 1 216 sa TIRAGELSS mm 5 8 6 HH 4 da b ENCORE GX 7 HLIYLHBRHPHIE 540 PAS DEFM 0 MODE 8 Pr sentation Dactylographie permet l apprentissage du clavier alphab tique tout en se r v lant un jeu qui d cha ne les plus calmes d entre nous Mode d emploi 1 Pr ciser le niveau soit 1 pour les mots de 7 lettres et 2 pour ceux de 10 lettres KEY 2 Le mot choisi par le programme s affiche alors et il s agit de taper chacune de ces lettres le plus vite possible KEY Si l ordre est respect les lettres s effacent une une jusqu la fin du mot Ceci fait le programme affiche le niveau de r ussite en pourcentage 3 Pour rejouer presser O la question ENCORE OIN sinon N KEY Programme LIST AR S IBB PRINT MI 18 PRINT seepaCTY VERUS 1 2 HPR La INT 28 A B GUEPARE 58 HKEV IF dati RECOS CHICLOME IF 2 2 2 998 C
11. ENCORE ONN sinon N KEY 128 F KET 8 8 LIF BC ES 148 IF KEY c tB m IIF BIBH 15 NENT Y 168 MEXT A PRINT QE sz ENCORE N PRINT 178 F KEY 0 THEN LU 4 188 IF KEY W PRIN T HtEM 198 80TO 178 288 FOR Yel TO zaji IF KEY 8 THEN s 228 218 NEXT Y 501D 168 128 FOR LA TO S PR INT CSR Us ic EE LU a 238 NEXT U PRIMT 5 2 1 6070 08 Exemple AREFLENES ee HEVER 1 5 7 SESPRET 7698 5 0 T9 0 t oe 3 o 06 3 ups Programme LIST 18 R 5 827 FOR YA 18 PRINT zegEFL EY TB WEIN 8 ESsa voc Pipriie 28 PRINT NIVER 1 38 FOR Y 1 TO Zaza 73 PRINT 38 PRINT SR s 78 SETIF fat ECSR B Estse IF 23 2 9R C 0 PRINT 1118070 58 188 IF I hniF 2 1 38 5070 38 t THEN 209 58 POINT steper 118 iF K T 7 15 8 7ssa t t PRINT IF BORA 128 IF KEY t 9 9e 68 IF KEY THE 68 iF AMIL 700 PAS DEFM 0 MODE 8 Pr sentation Revivez les joies des grandes poudreuses tout en restant dans un fauteuil gr ce Slalom mais gare aux sapins Mode d emploi 1 Choisir le niveau dont d pend la longueur de la course KEY soit 1 20 secondes 2 40 secondes 3 60 secondes 2 Le skieur est repr sent par un triangle et se dirige gr ce aux touches Z et E 3 Les bords de la piste sont d limit s par les pav s pleins 4 Le but du jeu est de descendre la piste en vitant de rencontrer les obstacles suivants Autre skieur
12. Jr T SIERRA 38 5g OX TRO HS US TANGA Wa KAA HOT ELE JTINA K LIET 58 Y INIFORM 4 YICTOR X4 HISKY Y X RA 1 12 YRMEEE 78 IKULU S PR f LETTRE Iwa FOR A 1 79 26 5 h 8 118 IF MDDR IARA 60T0 158 128 HEXT 158 gesug 188 PRIAT ESR 512825 en SAS i48 PRINT ENCORE ji tt PRINT sss PURGE Tr E ECH fNCORE dZN vani PHABET 8 LETTRE posee LI ENCORE FN asALPHABET EE joe OKI ENCORE DNA 158 IF KEy n THEN ig 168 IF KEY N PRIN segt amp RIDCL et aahi PHRBET LETTRE 3 E 2 ERCOREL N 7 Exemple LM 164 PAS DEFM 0 MODE 7 8 Pr sentation Ce programme permet de d terminer le montant de la T V A partir d un prix hors taxe ou de l extraire d un montant T T C Mode d emploi 1 Entrer le montant hors taxe ou toute taxe comprise EXE 2 Indiquer le taux de T V A intervenant dans le calcul en EXE 3 Presser 1 sile montant entr en 1 est hors taxe ou 2 s il est T T C KEY 4 Affichage du montant hors taxe de la T V A et de lasomme des deux EXE pour continuer 5 Appuyer sur EXE pour retour en 1 38 S SuB C P INT Programme 2387 MARIE 136 PAS DEFM 0 MODE 7 8 Pr sentation l usage des commer ants ce programme se charge de calculer le RM vente d un article partir de son prix d achat et de la marge Mode d emploi 1 Choisir l option
13. es en unit s d cimales en unit s anglo saxones Mode d emploi 1 Indiquer le choix dela con version selon le d tail suivant KEY 1 KILOMETRES CARRES SQUARE MILES 2 METRES CARRES SQUARE FEET 3 METRES CARRES gt SQUARE YARD 2 Pr ciser le sens de la conversion KEY soit 1 DECIMALE ANGLAISE 2 ANGLAISE DECIMALE 3 Entrer la superficie convertir EXE 4 Affichage de la conversion EXE pour continuer 5 Pour effectuer un autre calcul presser O ENCORE ONN sinon N KEY 4a 0ra 58 za PRINT CHOIR 1 72 YtPRINT ga ai Tit IF zt Ye C 5 6070 242808 Kyi za UTD 68 bos mme ust d 18 PRINT SSUPERET Ceteri 38 INPUT CMS CARR ES 5 8 206 148 PRINT ENCOR O IN TUS SPRTNT 1 PRINT SQUARE 158 IF KEY 0 THEN XILES 5 80T0 18 m LAN ciii i68 IF KEY N PRIN 2 INPUT C TE 5 382 53 JEPRINT SQUARE 79 SITO 158 PRINT ENS CAR YARDS 1516070 amp ES K GUTD A x iB INPUT M CARRES 128 INPUT SQUARE Y C1S 0818 764 26 PRINT SOUAR E TEET 8 8010 x Exemples ZMCORE Q N ZNCORE Q N 7 SUPERFICIES suPERFICE eo o Toe Von mue CROIX 1 2 De 12 us XMS CARRES CRERES ja X uat D 4 cappes 13 4785 3 126 83 S 4 5 EHCORE ON 7 AILES 176 83 wa LA aa AWAYE WAWA 15 42 8 SUPERFICIES SUPERFICIE aora gt D um capi 1 2 i SQUARE FEET SQURRE AIL 853 CRERES 68 6837 263 44 ENCORE DAH 7 SUPERFICIE 4 Qr O CHO
14. le nombre de pi ces ou de billets qu il faut r gler toutes les sommes indiqu es en 1 EXE pour continuer 58 IF s O91 TO 48 8 PRINT Suivant au Resultat S R T8 rIF XEY tS PRINT 80T0 SR IF KEY Ti 78 38 PRINT PRINT S qese toraie Hu 38 P H R DI IF 22 188 FOR P R TO 23 RRHH N RINT RGP txt 80T0 d Programme B 8 lt P EF INEXT P 16079 5 111 Exemples 112 Somme 1564 58 Suivant oy Kesultat 5 87 Ioas 4564 Suivant oy Resuilet ye Soste 2526 25 Suivant ou Resuitat sme z Somae totale i509 3 75 iix SBFF ax FF ax MF 2x SEFF ix FF 2x LAFF ix SFF zx FF ix FF ix 8 SFF ix 8 2FF gx A iF ix 8 8SFF Somme 5263 luivant ou Resuitat S R care 3825 25 Suivant ou Sesuitat S R Soare 785 38 Suivant ou Resuitat ya Sasse totale 1409 A 28x SeFF Ix 386FF 1x j88fF DE TATAUMERIRUE Y mf dd 317 PAS DEFM 0 156 MODE 7 8 Pr sentation Ce programme trie en ordre croissant ou d croissant un nombre quelconque de donn es et cela tr s rapidement Mode d emploi 1 Indiquer si le tri est en ordre croissant ou d croissant C ou D par KEY 2 Pr ciser le nombre de donn es trier Les limites sont les suivantes Sans extension m moire DEFM 28 soit 40 donn es max Avec extension m moire DEFM 156 soit 168 donn es max 3 Entrer une une les donn es trier EXE 4 Affichage de l ordre EXE pour
15. ou 1600 Grades Programme 28 INPUT TITRE 48 MODE J PRINT P Egg IMS UP RINT IMPRESSIO H dE XI 2719 B 144 SaEt5Y Ja INPUT X MINIMA 58 PRINT PRIMT LIST L X mREIMM RINT CSR 18 8 iB PRINT sSIMESOI L s 7 CRRRCTER 1 i DES NDE 5 38 nt 121 8 FOR RA TO Y ST EP P 80SUB 159 YeQNT Y91018 78 iF v328 Y 19 88 FOR 11 70 the IMEXT PRIMT 85 M EXT Exemple 38 PRINT PRINT HMNE 3 188 PRINT ENCORE 0 AM 2 5 PRINT i18 JF KEY 9 THEM iR 81 2 5 283185387 8 6 203188387 128 IF KEY M PRIN T rge 8 5070 118 Pr sentation ad 382 PAS DEFM 0 MODE 7 Ce programme dite sur imprimante de grands chiffres verticaux Mode d emploi 1 Entrer un nombre de quatre chiffres 2 Impression automatique des chiffres entr s en 1 Programme JST i8 IMPUT Hosere HF YALLS CIES THEN 28 IF VALP T HER 18 34 FR K 1 10 3 5 VALCLSIEMERT 8 Ap ESSOR pg Asaa te vn 1E88E tDgs E p E RODE 7 ge iif z E88E t 1E 8 88E99E i F1 12489 8 1 z 99E99E 17 E DA Ks1 T9 71 60 i TO Z PRIN 38 3 8 P484 348 KWANI WA Ip atii 98 i 122456 T0988 188 F R 2 3 T0 3 ST E HIF AK SPRINT 1 80 Exemples Somhre a i m 1 1 2 si N Y SUONDUO ep MAWA 125 enbueuiqye euuekopy s jjouoe sopugic nbiued anog eundees iAj9qog asume se gana aBessi
16. voici un petit programme qui leur permettra de connaitre leur jour de livraison F date day Sd 2 Mode d emploi sontn zania 1 Entrer l ann e dont on veut connaitre le jour de No l EXE SE uk 2 Affichage du jour EXE pour continuer AU 3 Pour refaire l op ration presser O ENCORE OIN sinon Sb de jours 14512 Wb ie DWS 307 Ne KEY Programme 43 E s 88 IF KEy O THEN ia LIST IF KEY PRIN 8 PRINT reesu ti TOUGHEND sssi YAE 188 en 2a 28 8 L UNDE cs 118 Zz8 IF E35 285 v HARDI 0 MERC zED 38 ES JEt VERDRED t 58 AED 84e b RAN cs Exemples sstsNOEL ters P ANNEE 1383 sQEL 1993 EST UM DIN ICHE ENCORE IN 7 ESPERANCE TE DEFM 0 MODE 7 8 Pr sentation Ce programme calcule selon des crit res quelque peu empiri ques le nombre d ann es qu il nous reste vivre ou que nous avons v cu en trop Mode d emploi 1 R pondre aux diverses questions du test EXE et KEY 2 Affichage du verdict 3 Presser EXE pour retour en 1 58 PRINT 8 8 0 PR 5 IHT Fusez vous 18 INPUT Duel ase pw wez vous Ri 78 IF KEYz W iD F BIREN i PRINT 15070 18 ADI 3 28 PRINT H os F SR IF KEYa U THEN jer 78 SIF KETs u 38 POINT INPUT E FE KEF asdien de cigar attes Par iul a PR SUESINT CS INT Ville ou C 188 B B CIPRINT Et sapasme VICO 25 y0us nerveux 58 C 2 IF KEYS e gaps 22t F KEYS g 118 Cz 2 iF EPs 0 THEN 58
17. 14 578 38 8 1 ER HE CH 48 PRINT apt TIAS Fe io B SUg K POINT 4 us Sa PRINT ap 758 AS 305Ug K PRINI us sa PRINT AS R 9 9 605UB K PRINT 85 t MEL T8 PRINT AS 3 5213 60908 KPRINT 85 3 amp PRINT Ap 8 3 RES S0SUB K PRINT R 28 PRINT a UR fto is SOSUB K PRINT i PRINT P i38 PRINT MCORE Q 178 c tFOR 1 16 S 2 cst 2 P0l M HI PRINT Siggi NEXT 530 D AVRIL 148 LE KEY 9 THEN S RETURN mW nm PRINT SPRINT 15 NE a Gad UE 3 i Non Ria itn ia SSON en CARACTERE 1 nuu n a 11 H a 5 88 a EJ y 3 1 d 1 ITI 3 11 8 i a n YA 120 201550N D AVRIL 398 PAS DEFM 0 MODE 7 Pr sentation Ce programme permet l impression sur imprimante de fonctions sinusoidales Y F X Mode d emploi 1 Mettre en ligne 150 MODE 1 l qu tion de la sinuso dale suivie par RETURN exemple 150 Y SIN X RETURN 2 Lancer le programme en mode 0 RUN EXE 3 Indiquer le titre du graphisme de 31 caract res EXE 4 Pr ciser le nom de la fonction de 8 caract res EXE 5 Entrer la valeur minimale et maximale de X suivie du pas d impression 6 Donner le caract re qui servira mat rialiser la courbe T Impression de la courbe sur imprimante 8 Pour refaire une autre courbe presser O ENCORE OIN sinon N KEY Attention rappel des limites de calcul de SIN et COS maximum 1440 ou 87A en radian
18. 248 sit ce Par o 208 GoT 198 SAGHE 1 1 6010 248 POINT Pal 586 258 HELL GOTO 268 Exemple JEU DE HINS SOTRE COUP 7 PILE 1 z Reste X SRENANT 1727 je prends 3 2 Reste H 5 ENTRME Q N SOTRE COUP Je prends 1 Weste Jeste VOTRE DOUP je Prends 5 i Reste Reste 16 VOTRE COUP je prends j 1 Reste 1l lai SRGWE VOTRE COUP Reste 12 le erends j Reste 24 9 31 425 PAS DEFM 0 MODE 7 8 Pr sentation Si les jack pots sont dor navant interdits dans les caf s de France ils ne le sont pas encore dans les ordinateurs en voici une preuve clatante Mode d emploi 1 Affichage du capital en dollars 2 introduire une mise inf rieure au capital EXE 3 Le tirage appara t suivi des gains ventuels qui d pendent des figures stock es en A 0 A 11 4 Pour rejouer presser O ENCORE O N 2 sinon N KEY Programme LisT 188 NERT W 1 T P 5 138 PRINT ENCORE 0 tea 5010 148 A 295 PRINT 118 PRINT e 39UIME 118 PRINT est R 148 IF KEY THEN iare ee TERNIN Esset itn 5d Etes END 5 198 IF KEY N PRIN 128 IF T28 THEN 178 T Tt WD S Exemples c ia MISE VOTRE MISE sr T RAGE Se 2 15 sia 1RRGE en ENCORE DA rae 8 25 ENCORE GX FOTRE MISE sa 15 iT ERREUR 23 e tati RAGE vise HE oe e B VS TERMINE 8 ENCORE ON ia 18 PEINT SLOT
19. F 33 8 Asi TO LENS c TPRINT HIME F 2HF BIDO iji 38 jaf fitit 38 PRINT dit 3 0 7 8078 IF 24 F 9E C AYS 8 3 3 6070 58 rsaPRET sent 129 NEXT fi0 7 i GOT a PRIMT 42 dm ro 4p de db dp T we o Q Qu aas 198 G 6 1 6070 298 IF 6 7 Y 1 80T0 3 218 6 2 28 MEXT D PRINT ATERNINE 65 04 159 DF Sey PRINT E BRLETEI S 3079 258 248 IF S YIPRINT c SAGHE 26670 E a es SOSU O dde 258 PRINT Vii GAGN gi 268 PRINT ENCORE D 24 2 PRINT 278 F LEY M PRIN Tot etEND 298 IF KEY O THEN 18 298 6010 278 188 FIR 221 i E ME XT DIPRINT SR T URN 8 i 3 5 4 R i E i 4 X 2 o 5 Ca HE I i amp T 8 6 EH fia s mt 23 83 w 8 5 E xd LI 455 PAS DEFM 0 MODE 8 Pr sentation R flexes ou la chasse aux mouches est un jeu qui fera couler beaucoup de sueur aux entomologistes amateurs Mode d emploi 1 Choisir le niveau de 1 3 KEY dont d pend la difficult 2 Le but du jeu est de coincer une pauvre mouche entre deux fourchettes et de la ratatiner le plus rapidement possible Les fourchettes sont repr sent es par et manipul es res pectivement par Z et C par E et SPC KEY 3 Quand ia mouche est entre les deux fourchettes on l crase par l interm diaire de la touche M KEY 4 Le jeu se fait sur 20 tours et l on rejoue en pressant O
20. PRINT 188 PRINT CSR R T it 808Ug 198 iBA FOR cR TG iW AT KRETURN 198 IF A THEN 285 195 IF Ae THEN 285 zaa RETURN 285 t 28 TF ZARI i5 ar etRbU 5 8 TO IBRMENT x 175 sosua FR RETUR 80508 188 i Exemple pa E 3 a 9 3 EE s 2 x us g 7 6 3 ES oak IRERE 142 PAS DEFM 0 MODE 7 8 Pr sentation Ce programme se charge de calculer les factorielles sup rieures 69 donc sup rieures aux capacit s de la machine Mode d emploi 1 Entrer le nombre dont on veut connaitre la factorielle EXE 2 Affichage de la factorielle calcul e 3 Pour calculer une nouvelle factorielle il suffit d appuyer sur O ENCORE O N sinon N KEY Programme T 58 PRINT ENCORE 0 18 PRINT FRCTURIE 24 2 TIPRINT LLES VA 58 IF KEY 0 THEN 28 INPUT VALEUR i E T8 IF KEY N PRIN 38 FOR 1 T0 izi T s ZH06 NAET 38 5019 58 I 48 PRINT Wi 1 QCZ INT 27581 St INT Z Exemples FACTORIELLES FRETORTELLES SALER 7 TRLEUR 7 25 3 25 1 581 21031 I3 3 683317612 1 5 36 ENCORE GN ERCORE GA 7 152 PAS DEFM 0 MODE 7 8 Pr sentation Ce programme se charge de calculer la moyenne successive d un nombre quelconque de termes Mode d emploi 1 Pr ciser le nombre d l ments intervenant dans le calcul de la moyenne EXE 2 Entrer un un chaque terme EXE A 3 Affichage chaque entr e de la moyenne des nombres d j intro
21. Pr ciser le port unitaire la remise et l escompte en 5 ainsi 3 que le taux de T V A en EXE Itseret Y 4 Affichage de la facture ainsi r alis e EXE pour continuer 5 Presser EXE pour retourner en 1 Programme LIST 48 FA RARE 108 5 YAC ESET F2 EIF Es PRINT 18 INPUT Quantit Eecospte F6B 4 A Prir unit 8 HT 8 Port HT 58 IF CHEPRINT P EE ortig 28 INPUT Teaise X 58 B ReB E PRINT ee D Escompte Total 8T 18 WITE cann 1E TUR EAA Ai Ua 79 PRINT Tatai TT 38 PRINT F Unite Ctgege 7188 60 HT Fes IF T0 5 Fe PRINT Rear sani Fani 107 Exemples 108 Quanti te du Prix umit HP 73 8 Port 8T Remise 1 ig Escospte X7 TM 18 5 498 88 Unites KT 38334 34 fesse 3038 38 tsggaete 689 47 rt 459 88 Total AT 34264 13 TUR 19 68 833 11 Total TIC 48631 26 Janv te 88008 Prix unit HT Fort Wi 4 Besse 17 i8 fscpgeete um Toc TE E LAU 47 25398 38 Denise 2588 8 Total HT 22708 39 TA 3 3 7498 25 Total TTC 2999 25 Syanti te 1 HAE i 325 PAS DEFM 0 MODE 7 8 Pr sentation Ce programme calcule les int r ts verser pour des p riodes 1 pouvant tre indiqu es en jours en mois ou en ann es Mode d emploi 1 Si les calculs exigent de d terminer le nombre de jours entre deux dates il est indispensable de charger en P1 le pro gramme NOMBRE DE JOURS ENTRE DEUX DATES 2 Entrer le capital montant de l e
22. continuer 5 Pour une autre conversion presser O ENCORE ONN sinon N KEY GS SN Programme i i8 PRINT IPLA 18 PRINT nc RpRET Tt eL LTRE Sa E 42258 5070 58 v d 48 arg 38 128 80SUB P G L8l 7 198 SOSUB SANA icem Sa PRINT CHOlit 1 Sot PRINT PIT ZI PRINT SARI TH li ul i ail F2 oRINT ua gs ttsebT A Lu Lx EMA Tin LE MC Ten d c aT MERS 2 ait ee 246 i i I S an RE on LOUE LUPIBHIEDnT 22222222 sortita taa GUSUB P 8 L32 1 238 PRINT TNCORE O 78 T0 s i2TIPRINT IN amp 2 1 98 THT 38 S0508 Pr cir 22 TS ugc t3 gb TO 1 SPRIT GALLONS 4 603 PAS EE A 158 INPUT PINTS 95 DEFM 0 YA TNPUT SALLING che MODE 7 8 Pd 8 80T0 Pr sentation Le programme effectue toutes les conversions de longueurs en tre les syst mes anglais et d cimal 188 G SUB P18 942 aLSPRIMT SALL 5 US 626079 Mode d emploi 1 Choisir l option correspondant au d tail suivant KEY soit 1 METRES FEET L 2 METRES INCHES TROURERQUN ENCORE ON 3 KILOMETRES MILES per both 4 KILOMETRES MILES NAUTIQUES 5 METRES YARD 2 Une fois l option faite on doit alors pr ciser le sens de la conversion soit esc RPRCITERS 1 DECIMALE ANGLAISE VECVATSIST EY 9 2 ANGLAISE DECIMALE SHOT 1027 QURRTS U5 16 395 ITRES fRCORES BAM D 3 Pr ciser la valeur convertir EXE i si 4 Affichage
23. correspondant au prix d achat KEY soit 1 si le prix d achat est hors taxes H T 2 si le prix d achat est toutes taxes comprises T T C 2 indiquer le prix d achat unitaire EXE 3 Pr ciser la marge EXE 4 Affichage du prix de vente T T C EXE pour continuer 5 Retour en 1 ANR ISSEMENT I LUPBIHPTS D DEFM 0 MODE 7 8 Pr sentation Ce programme permet le calcul du nombre d ann es d amortis sement de l amortissement annuel et de la valeur comptable nette apres amortissement Mode d emploi 1 Indiquer le prix d achat du mat riel EXE 2 Entrer le taux d amortissement constant EXE 3 Dans le cas d un achaten cours d exercice pr ciser le nombre de mois de la premi re ann e EXE 4 Affichage ann e par ann e de l amortissement et de la valeur Programme LE 5 vC ISET F2 JR PRINT INPUT P 18 PRINT N LAT 2 rix B Mare HESBUTO te FA mi pt A 2n EHT 24710 es nr Exempl WA ara ES i 1 85 Ej wm arse 13 6 1 75 8 vut 27070 28 Rei IF KEYS A2 IF XEY 2 THEN 28 rir TTC 2485 25 4a iF is F y8 D 0 0 184 E ztiESD Sa PRINT Prix TTC comptable nette EXE pour continuer Programme IR INPUT Prix w sateriel f Ta ur Bs Mois ler 2 annee T 28 Bi 8 D ESRB F E7120 JE PRINT MONTANT SADE 48 IF Cx s eF PR INT iere annee tr era Ride Di z8 FOR 5 1 79 pije JE PRINT anne e t AA waki 5
24. de la conversion EXE pour continuer SALLING 8 55 5 Pour un autre calcul presser O ENCORE O N sinon N ENCORE Q A KEY asp RPRCITIS IBARA Programme LIST 28 PRINT 1 2 34 SADIKI 1 2 7 i8 PRINT eat DWGUE 75 T PRINT PINTS 58 die NS METRE 38 ekpYIIR ditis mna 22 IF S2515 2ALI LITRES 1 9562 Kc198 6070 58 80 81 4 5970 58 28 PRINT CHOIX 2 S tt9pINT WA FAEYIIF Reit IF 84928 Yen YA i501 2928458 eO Dep 78 6079 68 38 SOSUR J F 2 388 99 PRINT 1616070 K 58 PIT EFT INFA 5848 6070 iaa S SUB 111 0459 PRINT INCHE t EBOTO x 1 8 INPUT INCHES BU 825460 ig t 28 INPUT SNS D S215840 PRI T AE MO 138 INPUT tnt m aa 148 INPUT MS 1 2 A De 53995631 PR INT MILES SIT Itt pe 158 INPUT ILES SA aA INPUT YRRDS sin 3144 59T E 20147 d x t1 por iva f geya EJ la IF x 385 DRIN iub 6010 id 228 PRINT x WPUT RETURM D Du Exemples FNCHES 2145 25 456 PAS DEFM 0 MODE 7 8 Pr sentation Ce proaramme convertit les mesures de volumes exprim es en unit anglaise en unit d cimale et inversement Mode d emploi 1 Choisir l option de conversion KEY soit 1 METRES CUBES BARRELS 2 METRES CUBES CUBIC FEET 3 METRES CUBES CUBIC YARDS 2 Pr ciser le sens de la conversion KEY soit 1 DECIMALE ANGLAISE 2 ANGLAISE DECIMALE 3 Entrer la val
25. l affichage ll faut alors presser une touche quelconque pour passer la question suivante Soit ENCORE O N s O renvoie en 1 si N permet l arr t du programme KEY Programme 38 IF XEY 7 1 8 88 IF 233 THEN 168 SOTO 68 38 IF KEV e 7 74 38 IF KEY 5 726 1 6070 64 LIST 010 68 189 FOR 1 1 TO 5 18 PRINT e eCRHTE 58 STD 8 12345 Sers 58 SOSUB 268 F R E 118 IF KEY MID I 1 28 Z 1 PRINT 352 t 105 160548 228 PRTN QU 2 2 T PRIM 78 50SUB 228 805UB T CSR 132 T 258 NEXT 1 s 18 LL iii 128 MEXT 188 PRINT ENCORE D 248 MSCD AIDCINT i 130 IF KEY 2 24 AM 2 PRINT RRMISTHD D RE 1 80T0 158 198 IF KEY 0 THEN TURN 148 6070 94 18 258 eeer PRINT 158 GOSUB 268 FOR I 288 F KEY W PRIN SR RSD i T0 5 80SUB 2 T ERMD IBID 0 5B MEXT 1 80T0 218 somh 198 ETURN E 228 ACID INT RANES 258 pl x Ba 1 s ew 238 ORVWITB32745 TURN 178 IF KEY THEM amp 178 SERCRRTES es AHCARTES es pem 332 99 532 52 00 222 xs TIRAGES as TIRAGES Bittanti neret res TI RRGE RA ses TIRRGE e R gege7ot Wa tert IRAGE Ses trt IRAGE Verre get Tee aa aa ENCORE 0 N CNCORE 0 N 19 227 PAS DEFM 0 MODE 7 8 Pr sentation Le programme se charge du tirage d une s rie de d s dont le nombre peut tre s lectionn Mode d emploi 1 Indiquer le nombre de d s intervenant dans le tirage de 1 10 EXE 2 Les d s tournent et s affichent chaque pression de EXE
26. l existence du voisin tel point qu il est arriv r cemment qu un infirmier automatique mette par erreur un pochanoiaque dans un autre club que le sien Le r sultat de cette m prise fut un horrible charnier qui nous co ta un patient Rassurez vous nous avons fait reprogrammer le coupable et je vous garantis que cela ne se produira plus La structure des clubs est assez similaire Nous retrouvons les cas types D abord les ludicod pressifs ils sont majoritaires et leur particularit est d inventer constamment les jeux les plus fous si je puis m exprimer ainsi Une fois termi 10 n s ils les stockent sans jamais les utiliser Ensuite nous avons les gestopathes qui passent le plus clair de leur temps g rer tout ce qu ils peuvent g rer lis se caract risent par le port en bandou li re d un tableau de bord lectronique sur lequel se trouvent toutes les pr visions qu ils suivent la lettre Cela va du nombre de pas effectuer dans la journ e au ratio de la valeur ajout e du dentifrice qu ils mettront sur leur brosse dents Enfin les maniaco scientifiques obsed s par la cr ation d quations plus abracadabrantes les unes que les autres qui se r sument bien souvent par 1 2 Si ces derniers sont assez peu nombreux je vous avoue qu ils n en sont pas moins farfelus L un d entre eux a m me d couvert que le nombre d or tait un al liage Pour terminer sur un cas original je vous raconterai celui du sujet q
27. le programme indique alors l ordre de chacun d eux 4 A laquestion ENCORE O N r pondre O pour retour en 1 r pondre N pour arr ter KEY Programme S8 IF RD 5 CZ 188 FOR 1 10 5 2 1 INT RODIINEXT 58 IF G Z 1 tt L PRINT STOP LIST 1 2 PRINT 118 PRINT ENCORE 18 PRINT zewTIERC 1555551155357 yA Des PRINT bee PRINT 128 IF KEY 0 THEN 28 YA PRINT ses Ta PRINT ESR 2 18 PRET ets ipi 2 60S08 158 138 IF KEYzN PPIN Nf 88 MEXT Z IF LG T Te 38 IF KEY THEN HEN 48 148 GOTO 178 3 98 PRINT PRINT 158 FUR H 10 30 N 48 FOR Z 1 10 S 5F ARRIVEE 9 EXT RIPETURM 8 1 THEN 3 8 vs TERCER Sample HAPRET Ovi 155114155585 ARRIVEE LJ 12 1 17 446 PAS DEFM 0 MODE 7 8 Pr sentation Pouvant intervenir comme sous programme d un jeu beaucoup plus labor ce tirage de cartes distribue des mains de 5 cartes avec la possibilit de supprimer certaines d entre elles Mode d emploi 1 Indiquer le nombre du jeu initial KEY soit3 pour 32 ou 5 pour 2 2 Affichage des 5 cartes choisies par le programme 3 Le tirage se faisant sur 3 tours on a la possibilit de supprimer une ou plusieurs cartes en pressant le num ro qui lui corres pond de 1 5 KEY 4 Pour redistribuer une main compl te presser KEY 5 Pour redistribuer les cartes supprim es presser KEY 6 Pour indiquer que le dernier tirage a eu lieu le programme affiche une toile gauche de
28. 0 Poids id al 92 SIgne BEA une au nx RSS Ee TE 93 Alphabet phon tique international 95 COMPTABILIT ASE aca sea p Rie mer ti aas re MR UERRIEA O E 97 MATOS esicresuacoxxcexvscexxeni x b HERE EG 98 Amortissements constants 99 Amortissements d gressifs _ _ 101 Amortissement constant d un emprunt 103 Amortissement progressif d un emprunt 105 FAGOR AM EROR eer Wal reads di 107 FE RC et PERRET E T OIORERIN ICI 8 c qui or MEA RE VOD OEDS puc Un Classement alphab tique GRAPHISME Carr s divers PORN Soa vsu sor elo aca sioe Lilo 3 6m 2 Sinusoides Grands chillfes oA sed vH COMPTE DE FAITS C est ici me dit le docteur Spietfield tout en me d signant ia section des pochistes r cemment cr e pour faire front l ac croissement consid rable du nombre de cas Nous entr mes et je fus quelque peu abasourdi par ce que je d couvrais Comment tait il possible en l an 2012 que tant de gens aient pu devenir malades de la pochano a ou du complexe de pocheux tel point que la cr ation de ce service s tait r v l e indispensable Le m decin chef allait tenter de me l expliquer Voici l un des cas les plus typiques Cela a commenc pour lui d une mani re assez classique Cette sorte de patient ne laisse paraitre a
29. 00000 88 INTERET 208868 dd ARORTIS 386668 3s ANMI ITE 289068 36 PERIME 5 DETTE 368808 a wa 130000 28 15 igaReed 29 Read 1198998 08 5 PERIODES CHPOUMT 5888488 36 TOTAL IBTERETS E aR osent T PRE THEE a LL RUN JN ENI 297 PAS DEFM 0 MODE 7 Pr sentation Ce programme calcule l amortissement progressif d un emprunt en fonction de la p riode et du taux d int r t Mode d emploi 1 Entrer le montant total de l emprunt EXE 2 Pr ciser le nombre de p riodes EXE 3 Indiquer le taux d int r t en EXE 4 Impression p riode par p riode de l encours de l annuit constante et de l amortissement 5 Pour effectuer un nouveau calcul appuyer sur O la ques tion ENCORE O N sinon N KEY Programme ia INPUT Espruet 137 Mb rerioges UM Ed PRINT BHRTTE INE TET Ta ESE 1 T MENT J PRIR LIST PRINT sPERT0BE Tot PERIODES tome ISET Y s 105 58 SET 72 PRINT E Ba PRINT PRINT E gg IF KESIN THEN Aib ET b POUNT I SCORE D N 78 NN ka za Ip geyena 39 END bt 3 Tag TS n acum nee pet 291 PAS Exemples DEFM 0 MODE 7 8 Pr sentation Ce programme permet la r alisation de factures tenant compte des remises des escomptes du port et des diff rents taux de T V A en vigueur Mode d emploi caen 1 Entrer la quantit d objets facturer EXE Basso A 2 Indiquer le prix unitaire hors taxe EKE p rerindes 3
30. 1H It E GOSUR TR PRINT rssPRET Z PRINT 5 M7S 22482 PRINT SrCSR BE 48 IF KEY TREN 88 5OSUB Z IF KEY a argel Ez 2 3 E gd 128 PRINT fcraseme ntl 138 PRINT ENCORE 0 8 2 2 PRINT 148 IF KEYz O THEN i8 188 IF KEY WI PRIN ToHiEND SALUNISSAGE uwape Dave Si8L 2284 ams 26 Se 3208 168 GOTO 148 176 FOR L 1 T0 208 NEXT L PRINT R ETURN 35S 26 Ecrasesenti i ERCRE AN 7 41 662 PAS DEFM 0 MODE 8 Pr sentation Bubbles est un v ritable duel entre deux joueurs humains qui sera impartialement arbitr par l ordinateur Mode d emploi 1 Le jeu se fait sur 50 tours Les joueurs doivent chacun m mori ser un nombre de signes d pendant du niveau choisi 1 4 KEY 2 Chaque joueur dispose d une touche qui lui est propre Le premier a la touche Z et le deuxi me la touche KEY 3 Une fois lanc le programme affiche un signe choisi au hasard et le joueur qui pense reconna tre un de ses signes doit presser la touche qui lui correspond si la r ponse est juste il marque un point sinon c est l adversaire qui en h rite 4 Pour rejouer presser O ENCORE O N7 sinon N KEY Programme 58 INPUT ler FREN 98 IF KfYz THEN n ds Pese PR EL ENOR vs 184 FOR 0 1 D As 8 E INT RAR TR SBESK INT iR LIST 113 728 BHRCLENK ISD HE 18 PRINT seBUBBLE TA 2 006 x200 MB 1 Lies VA DE nb iie IINR DEFOR 28 PRINT MIVEAU 1 S NIDCE
31. Franck LAZZARI Bertrand RAVEL Les titres de cet ouvrage ont t r alis s avec le logiciel graphique LSPG1 de LOGI STICK sur imprimante FP12 CASIO Tirage de cartes Tirage de d s Dactylographie uolo NENNEN Nombre secret montes Memory Jeu de Nim Slot machine Chiffres m lang s SCOOTER OMORE erc uae arescit eire Foot Alunissage Bubbles Mosquito suisses Vp Race cts Balance Roberval Catapulte EN Boule panique MATHEMATIQUES Grandes factorielles Moyenne arithm tique Progression arithm tique Somme des n premiers nombres 60 Gealcuf OU TOM INE CE CO ie ER EIE EE RE 62 Tous les chiffres d une division 63 Velas ROSE ESOS 64 DEGERE UN edu sue eu NNde 34 T Ah rm hinr 66 FONCHONS LEE Re SN TRUE 67 Volumes divers cuoc eee ST ada o2 2 69 SGurtlicos ONAE creme tar cR nx 71 VIE PRATIQUE Conversion de temp ratures _ 73 Conversion de forces _ 75 Conversion de poids 1 77 Conversion de capacit s _ 79 Conversion de longueurs SOS EN XU RENE 81 Conversion de volumes 4 83 Conversion de superficies 85 Nombre de jours entre deux dates ____ 87 Jour Bi NgOl EL TEEN sus sons Ao mte nem 89 Esp rance de vie 9
32. GUEULLE Montages p riph riques pour ZX 81 C GALAIS Passeport pour Applesoft R BUSCH Passeport pour Basic M ROUSSELET Math matiques sur ZX 81 C GALAIS Passeport pour ZX 81 G PROBST 50 programmes pour CASIO FX 702 et 801P G PROBST 60 programmes pour CASIO PB 100 7 La loi du 11 mars 1957 n autorisant aux termes des alin as 2 et 3 de l articie 41 d une part que les copies ov reproductions strictement r serv es l usage prive du copisle et non destin es amp une utilisation collective et d autre part que les analyses et les courtes citations dans un but d exemple el d illustration toute repr sentation ou reproduction int grale ou partielle faite sans le consantement de l auteur ou de ses ayants Gro ou ayants cause est sllicite alin a 1 de l Art 40 Cette repr sentation ou reproduction par Quelque proc d que ce soit constituerat donc une contretacon amp amp nctionn e par les An 425 et suivants du Code p ril 1984 E T S F ISBN 2 85535 064 6 ISSN 0757 6730 GILLES PROBST 60 PROGRAMMES POUR CASIO PB100 FX802 TANDY PC 4 et OLYMPIA OP 544 Diffusion DITIONS TECHNIQUES ET SCIENTIFIQUES FRANCAISES 2 12 rue de Bellevue 75940 PARIS CEDEX 19 L auteur remercie de leur participation la r daction de cet ouvrage ses collaborateurs Alexandre OCANA de la soci t CASIO FRANCE Andr TONIC
33. IX 1 2 7 CARRES SQUARE RROS 65 781 8 86 581 278 PRIMERE DE JOURS EUTRE TELUH ORTES 291 PAS DEFM 0 MODE 7 8 Pr sentation Particuli rement utile en finances voir int r ts simples ce pro gramme donne le nombre de jours entre deux dates quelcon ques Mode d emploi 1 Dans le cas d une utilisation avec INT R TS SIMPLES il est imp ratif de mettre ce programme en ZONE 1 P1 et de rem placer GOTO 5 la ligne 30 par RETURN 2 Une fois lanc il convient de pr ciser les jours mois et ann es des deux dates concern es EXE 3 Affichage du nombre de jours entre les deux datesentr es en 2 EXE pour continuer A noter le programme tant polyglotte on traduira day par jour month par mois et year par ann e Programme LIST 25 50508 68 zm 38 KARS N Z 9RI i8 t t80508 78 NT Nb de Jours sas 38 6070 5 38 ii iR 14319041 23 2 4 8 2 80SU iNT A 127188 Haa Me2 60S HINT iiia gg 58 3070 58 PF OMe2 80SUb 5 4 6010 29 15 S0SUB 58 87 25 Wee d RETURN 85 ANIME A740 78 PRINT PRINT 5 miT WES Hiie es dali SEE gi ug Sa KISHA 82 1SRETUEX date rt INPUT a Hip HUE n AITA 18T day j sonth Hi ass i iie 2 1 tR years INT CR 108 75 RETURN 335 PAS Exemples ste day i date gay DEFM 0 p 5 MODE 7 8 onth zani di T Pr sentation 954 382 l usage des P res No l tourdis
34. Pr sentation Ce programme convertit les mesures de poids anglaises en me sures de poids d cimales et inversement Mode d emploi 1 Choisir l option de conversion KEY soit 1 GRAMMES gt OUNCES 2 OUNCES GRAMMES 3 KILOGRAMMES POUNDS 4 POUNDS KILOGRAMMES 2 Entrer la valeur dans l unit choisie en 1 EXE 3 Affichage de la valeur convertie EXE pour continuer 4 Pour effectuer une nouvelle conversion presser O EN CORE ONN sinon N KEY Programme 237 Ww 18 POINT eweePoID Sera cti 29 PRINT 2134233 MAY SPRINT 58 INPUT GRAMMES 38 S KEY IF ali IF z VRo C S5070 Zalga 48 5019 Ja 528 3940 PR NT ERRINES amp TO 4 78 INPUT KILOGRME 38 POINT ENCORE 1528 2 SRARNES 168128 5 TEREGA ERCORE 2 N 78 ges Cip 82 28 AN SPRINT 1261 22 vou E TIE EREREITE 7 DEFM 0 MODE 7 8 Pr sentation Ce programme effectue toutes les conversions d cimales en capacit s anglo saxones Mode d emploi 1 Le choix des options se fait par KEY en fonction du d tail suivant 1 LITRES GALLONS GB LITRES GALLONS U S LITRES PINTS GB LITRES PINTS D S LITRES QUARTS G B LITRES QUARTS US 2 Indiquer le sens de ia conversion KEY soit 1 DECIMAL ANGLO SAXONE 2 ANGLO SAXONE DECIMAL 3 Entrer la valeur convertir EXE 4 Affichage de la conversion dans l unit choisie EXE pour
35. RC HIN 28 f eeeht T 18 38 B z ewe ig eS QU TS Mors AR Epps 1F 5 5 t PT ETS ET 53 POINT iT NPUT VOTRE MIS EMPHF PP THE N 58 T8 FOR NAA TO 2 34 ODZRIDCINT RR Wise YU 38 j5 3 9 428 FOR k T0 12 FR IF V z8 0D 5 T NT BATTS P 6070 118 Pr sentation Jeu de logique par excellence ce jeu consiste remettre en ordre 9 chiffres m lang s et cela en moins de coups possible Mode d emploi 1 Entrer le niveau de 1 9 KEY de celui ci d pend le d sordre de d part 2 Affichage des chiffres m lang s et du nombre de coups d j jou s 3 On dispose de 4 touches de 1 4 pour remettre les num ros en ordre chacune d elles correspond aux permutations sui vantes 1 000000000 3 000000000 4 000000000 LA i 4 Une fois l ordre r tabli s affiche le message GAGNE et le nombre d essais qu il a fallu pour y parvenir 5 Pour rejouer il suffit de presser O ENCORE OIN ou sinon N KEY 34 2 000000000 Al TA 80SUB kaigiza SR IF KEY 0 THEN ia e NEXT 0 6070 128 t 88 Y V I PRINT V Y 178 IF KEY N TPRIN 33PRINT T EM 38 S XEY IF ptit 198 507 168 LIST TF 24 MALE 218 T 1 0 4 60808 G 18 PRINT ssCHIFFR 6070 118 17221023 60SU8 ESes nt 188 5010 4 S RETURN 28 25R PRINT M 18 S0SUB aza 228 7 2 0 5 00908 Q VERU 1 9 2 PR 128 Y 8 IFOR P TD 11231024 50548 INT S19e VAR CP df
36. SIGNE AS 78 INPUT JOUR 5 MOIS 4 60 8 tezita SOTO z 38 z CRPRICORME IF DiSIF et THEN 58 48 RETURN 58 VERSERI IF TASHF 1 2 THE x 78 68 RETURN 78 POISSNS F DB 3 TH EE 58 RETURN 28 8E IER IF J 228 IF 4 THER 118 188 RETURM 118 Sz TR RERU t IF Jm IF 3 5 THE 4 138 ar Tz CRNCER SIF 3 SINIF REI THEN 1 168 RETURN 170 LIOR IF 222 1 trIF Me THEN 3 188 RETURN 198 VTERGE t IF j 22 1F 9 THEN it 288 RETURN 2 8 BRLRACE t IF 1XNIF en TH EE Exemples Ta f SCIPION IF j2 IF Mil T Hi 258 248 RETURN 25 f SABLTTRIRE IF DIF 02 TEN 38 iza RETURN SIGNE ASTRALHSAGITI amt ENCORE JUN 19 PRINT SIGNE RS TORL 99 5 ENCO 9p 0 M 2 PRIN T 288 IF KEY 9 THEN i 288 IF XEY N TPRIR T UHnto 188 6070 258 ALPHA 559 PAS DEFM 0 MODE 7 8 Pr sentation Ce programme permet la traduction de chaque lettre de l alpha bet en code phon tique international bien connu des aviateurs Mode d emploi 1 Entrer une lettre de l alphabet KEY 2 Affichage de sa traduction en code international EXE pour continuer 3 Pour une autre traduction presser O ENCORE OIN 7 sinon N KEY O ENCORE OIN sinon N KEY ramm 49 Lg KTLO ASE Drome Pal IMA H MIKE E 0 NOVEMBRE P4 18 B RL PHA C4 010 BRRVO 54 CHAR Sa PaPR tP 6 LIE E a DELTA UEBEC 5 ROME IRR TDNO
37. Tous les programmes de cet ouvrage sont class s par types d applications soit JEUX MATHEMATIQUES VIE PRATIQUE COMPTABILIT 2 Chaque programme a en en t te le nombre de pas qu il re quiert ainsi que la partition m moire DEFM Avant toute saisie l utilisateur avis aura soin de v rifier que le nombre d octets requis par le programme est effectivement disponible Pour cela on ajoutera au nombre de pas annonc un nombre de pas gal huit fois le DEFM Exemple 524 PAS DEFM 5 524 5 8 564 PAS A noter que les machines fonctionnant sans extension m moire ne pourront recevoir les programmes de plus de 544 PAS au total 3 Une fois saisi le programme est lanc par l instruction RUN EXE ou F1 PX avec X correspondant la zone m moire o le programme se trouve 4 Pour utiliser chaque programme dans les meilleures condi tions il est pr f rable de suivre exactement le mode d emploi en tenant compte des instructions entre parenth ses exemple EXE 5 En ce qui concerne les erreurs en cours de manipulation il s agit tout d abord de v rifier que le programme saisi est stricte ment identique au programme imprim Si c est le cas il sera pr f rable de consulter ia notice du constructeur pour la com pr hension des codes d erreur 6 Les programmes de ce manuel sont pour la plupart des exem ples d utilisation des diff rentes fonctions du micro ordinateur et pour permettre une meilleure tude un ta
38. alcul presser 0 ENCORE OIN7 sinon N Programme iist 68 PRINT rto 18 PRINT zaphg YO J s ENCOR MEss VAT E B M 2 t PRIMT 28 INPUT SUP fW REY FOR Z T 78 IF KEY 0 THEN 8 STEP i 44 38 PRINT RC 2 38 IF KEY N TPRIN 32 INPUT A2 T eb NEXT 2 38 STD 7R 48 IMPUT O i3 XV 38 FOR Z T0 ST EP iiti NEXT Z Exemples Pr sentation Indispensable la r solution des quations du second degr le discriminant sera ais ment calcul par le programme suivant Mode d emploi 1 Le discriminant intervient dans la r solution d quation du qur Bx Cetse repr sente par A Sa valeurest gale 2 Introduire successivement les valeurs de A B et C EXE 3 Si gt 0 le programme affiche X et X Si A 0 le programme affiche X Si lt 0 le programme indique que l quation ne peut tre r solue 4 R pondre O ENCORE O N pour une autre quation sinon N KEY Programme an IF DORSPRINT P Exemple RS DE SOLUTION P 50T0 68 58 PRINT Ai List B S0R D 2 2 DISCRIMINANT 18 PRINT DISCRIMI zi Ba 0072 a WANT VR 58 PRINT ENCORE i 28 INPUT 9 8 AN 7 PRINT 8 BUE 0 T8 IF KEY h THEN 12 42 7 2 18 554 78 IF P REPRINT 3 58 IF KEYz N TPRIN i z B 2 B0TO 6 T S EMD ifi 8 28 5010 78 ENCORE ON wirt EREA 176 PAS DEFM 0 MODE 7 8 Pr sentation Ce programme permet de connaitre tous les points d une courbe quelconque image de la courbe
39. ante dite extensionniste r v l e par l achat des interfaces et des accessoires qu il consi dere comme indispensables et pour lesquels il ne reculera devant aucun sacrifice Afin d illustrer mon propos je vous citerai l exemple de l un de nos malades qui a vendu son ceil gauche pour s offrir l interface de visualisation st r oscopique Point n est besoin de vous dire que lors de son arriv e il faisait terri blement piti tant il tait d sesp r Heureusement notre robot psychiatrique eut l excellente id e de le traiter au RAM de 500 M gaoctets et il s en est remis mais c est tr s rare Pour tenter de cerner les racines du mal nous leur avons fait passer une s rie de tests dont les enseignements laissent r veurs car les effets furent oppos s ceux que nous escomptions pour la rai son suivante il tait impossible de les leur faire passer sans leur machine et non seulement elle faisait tout mais en plus ils en redemandaient La dure vie d un pochanoiaque La visite continuait au rythme des castypiques quis alignaient en bon ordre sur mon carnet vocal pendant que j interrogeais le professeur sur l organisation du service La structure est aussi organis e qu ils le sont eux m mes r pondit il Ils ont une ten dance marqu e se regrouper en petites unit s qu ils ont bapti s es clubs leur donnant par l m me les noms les plus farfelus Le plus troublant est que chaque club tend ignorer compl te ment
40. bleau r capitulatif se trouve en fin d ouvrage 13 212 PAS DEFM 26 MODE 7 8 Pr sentation Rentabilisez votre pocket gr ce ce programme de Loto qui se chargera de tirer les num ros gagnants de votre prochaine grille Mode d emploi 1 Lancement par RUN EXE cor le nombre de num ros que le programme doit tirer EXE 3 Affichage de TIRAGE et du nombre de num ros choisis en 2 EXE pour continuer 4 Ala question ENCORE O N r pondre O pour retour en 1 r pondre N pour arr ter KEY Programme 78 E IMT fu Exemple IUE RUM THE P 4 7A Ya 38 PRINT tig IT us B ICIE TE IRRGE 6 HC i8 PRINT tses TO R TEES 2e 38 pe ENCORE teri RAGE ee 28 FOR A T0 49 R pond 9 18 MZIKI 3 188 IF KEY 9 THEN thee 15 JA INPUT TIRAGES X UM 79 HBt ciF eei 118 IF KEYSWUSPRIM 22 F Ceia TREH 58 HUE c 18 d 5079 38 128 6010 138 d 3 58 PRINT exsT RBG ded fest eS 58 FOR i TO C ENCORE QAM 15 HIER 212 PAS DEFM 0 MODE 8 Pr sentation Vivez les joies du derby d Epsom ou du grand prix d Am rique en participant un grand troph e hippique o le suspense reste entier jusqu la derni re ligne droite Mode d emploi 1 Affichage de PRET le d part se fait la pression d une touche quelconque KEY 2 La course se d roule sur display de la machine et l arriv e de chaque cheval est signifi e par une rang e de 3 Quand tous les chevaux sont arriv s
41. destruction du point que se termine la partie et que s affiche le record si ce dernier a t battu 4 Une fois termin presser EXE pour rejouer iB PRIMT 8DTO 75 f i cdd NN NM Exemple 191 M sem am SA tm D gt tdi name Programme HE P p LA PE 48 PRINT 758 18 FINT PRINT WRTPULIES SSHO as j 38 MSUR ISIPRINT 53 Cin l 544 PAS DEFM 0 MODE 8 inspir du c l bre Donkey Kong ce jeu met aux prises avec une amada de vilains tonneaux remplis de mauvaises intentions Mode d emploi 1 Le joueur est repr sent par et les tonneaux par 0 Ces derniers d boulent de la droite afin d emp cher toute progres sion du joueur 2 Les touches de commande sont Q pour avancer et P pour sauter un tonneau KEY 3 La partie est gagn e si le joueur arrive rejoindre trois fois de suite le c t droit de l afficheur Trois accidents entra nent la fin de la partie 4 Pour rejouer presser EXE en fin de partie programme 45 2 T i ec Fi I 48 Dzp t sC 1 iS iF ADEME 45 SUB 108 J IF 3 4 THEN IA Ta8sPRINT o5 2 R ceas IE PRINT CSR A SE pigrpeluT 3 5 2 PEINT TSR Jit CHANT ya 55 TF 0060508 za 3 78 SSB 188 F Cuisir CAF INT 844a IF 5 0 101 ig IF F 5j3edi 45 Te DETUEN 428 PRINT CSR 85 6h DEE 6670 3 PRINT 28 PRIMT CSR Feit LS IF C2 PRINT CS at Dag PRINT CS ri isa IF R Die 145 80SUB 198 158
42. duits EXE pour continuer 4 ENCORE OIN soit O pour recommencer ou N pour arr ter le prooramme KEY us za PRINT TRCUN O Programme J PRINT NOYENIE A P PRINT Ag AC 74 ir XEY 0 THEN 28 INPUT HB TER Qn 89 iF KEY W PRIN 18 FOR i21 70 T F EN 8 PRINT CTEPESID 98 6070 7A 33 INPUT 4 58 LAIT PRI NT AVE KENT 57 Exemples 3 TERME 1 E ii 5 Ce programme calcule le nombre de termes voulu d une progres on dont on aura pr alablement pr cis la diff rence d emploi le premier terme de la progression EXE ser la difference raison qui s ajoutera aux termes suc fs KEY uer le nombre de termes de la progression EXE age de chaque terme EXE pour continuer ainsi que Somme rune nouvelle suite presser O ENCORE O N sinon H ex 5 t n na Dr ei pe aR Lad 68 PRINT SOME gt Exemple 15 ENCORE O H PROGRESS LON PRINT ier TERME 78 I KEY 0 THEN E 18 MIFFEREKCE 38 IF KEY H PRIN 13 tts END NB TERMES 36 5070 78 4 TERME i155 TRE 271 2 TERME 209 6 TERME 4 11 9 TERME 5 14 2 TERME 6 16 5 SIME 44 5 59 245 PAS DEFM 0 MODE 7 8 Ce programme permet d obtenir la somme des n premiers nom bres entiers la puissance 1 2 ou 3 Mode d empiol 1 Indiquer la puissance des entiers additionner KEY soit 1 Pour les entiers normaux S 1 2 3 n Sn nt n 1 2 2 Pourles entiers au ca
43. e O pour rejouer N pour arr ter Programme LIST T8 IF 93213 851 45 18 PRINT eeHOMBRE somo 98 SECRET VAC 38 NEXT I R 18 28 N INT RAMe 188 98 FDR 1 1 10 L FOR 121 70 RES PO t WENT 38 INPUT PROPOSIT Y IUN P IF PT 188 PRINT E F P 18 THEN 58 XT i 48 60TD 38 TIG PRINT resPERDU 38 IF P M THEN 168 Css D agait 58 DABS P N F R 5 J TD STEP 128 PRINT ENCORE O i M PRINT 1 KEY 0 THEM 168 FOR LES TO 11 P 178 PRINT se GniHE mt RINT CSR d e tasa ESSAIS 148 IF KEY M PRIN CSR 11 0 w N 1 8070 128 T EN EXT SPRINT 158 6010 138 empl NOMBRE SECRETS FeNOMBRE SECRETS ex PROPOSITION PROPOSITION 25 3 PROPOSITION Ponens TON 5 F5 v PROPOSITION PROPOSITION 4 45 v E PROPOSITION PROPOSITION 38 e a PROPOSITION PROPOSITION 7 E Paw nm PROPOSITION PROPOSTTTON 5 78 cv eee PROPOSITION PROPOSITION 5 5 3 000 ve xsspERDU es sasPERDU eov C etait 2 C etait S3 ENCORE 0 8 ENCORE Q W 27 Pr sentation D veloppez la m moire tout en jouant est la raison d tre de memory o il faut se souvenir de la position de signes quelcon ques inscrits sur l affichage de la machine Mode d emploi 1 Indiquer le niveau dont d pend la vitesse d affichage des ca ract res de 0 3 KEY 2 Affichage du PRET Le jeu d marre la pression d une touche quelconque KEY 3 Un nombre variable de signes ap
44. eur convertir EXE 4 Affichage du r sultat EXE pour continuer 5 Pour une autre conversion presser O ENCORE ONN sinon N KEY 38 HAET KA IF 827 ZR C vem 5e 48 GOTO 38 za PRINT CHOIX 22 9 1 PRTHT Programme 83 8 SETIF ptt IF zf2 Y ARL C 50T0 2628468 s Y Ds18 78 5010 58 H SUSUB P B Me6 2 HT PRINT SARR ELS 8 6070 L 38 INPUT SRERELS BB 159 60 108 186 SOSUE P C M635 ZA PRINT CUBIC FEES 6070 1 9 INPUT CUBIC FE ET r CHTS 028 32 6070 5 128 60548 P 1 288 M PRINT CUBIC Y8g05 C 6070 138 INPUT SUBIC YA RDS Cite 755 8070 S idh PRINT ENCORE 0 J4 PRINT 158 IF KEY 0 THEN t8 168 IF KEY M PRIN T riEND 178 5070 154 188 PRINT N INPUT M RETURN 198 PRINT H i 5070 L Exemples seit nee ir CHOIX 1 2 7 4 CUBES 118873 SRERELS 1998142 119 EHCORE ON 7 cere 0L UNE e iO O CHOIX 1 2 7 ciei FEET 3123 A CUBES 58 5 EXCORE 6 X 7 eei unt ees 11 2 o CHOIX 1 2 URI YARDS 1497 A CUBES 1114 685 ENCORE N 84 est ONE See divo cme 27 2546 2ARRELS 16812 3578 ENCORE Q R 7 MBIC FEE 717 CHOIX 172 7 SUBI FEET 5 A CUBES 13 492 ENCORE UN DUR 2 tp o dO CHOIX 12 CUBES 57 LUBIC YARDS 537 756 CONVERSION LL IE SUPEREILIES 502 PAS DEFM 0 MODE 7 8 Pr sentation Cet utilitaire se charge d effectuer les conversions de superficies exprim
45. i FF KEYEN THEN iza 3 129 PRINT E b4C iN PUT Cossien amp heures ae somme il sar nuit t 138 PRINT H IF C 151022 148 IF 229 C 1 158 B B C PRINT Rv az yous une t o g IF KEYs N F rys a THEN 158 178 PRINT amp ReCIPR INT 2 1 EIVERDICT iis 188 Demetr GAP RINT Vous gevr ler deja etre amp art titg 5 198 PRINT Yous viy rez ius ail ans SOTE Exemple Quel ase avez vous 25 Wan Fjes 4 Ville ou Cameasme ares 64 Tumez vous QN tes vous nervegr 3 Losbien d heures ae somseii Par nuit Avez vous une auto Q a FTISERDICT Sous vi vrez jusqu 15 ans RUE LUE FL 220 PAS DEFM 0 MODE 7 8 Pr sentation Ce programme calcule le poids id al d une personne en fonction de sa taille de son sexe et de son ge Mode d emploi 1 Entrer la taille en centim tres EXE 2 Pr ciser l ge EXE 3 Presser l initiale du sexe int ress soit H pour homme ou F pour femme KEY 4 Affichage du poids id al EXE pour retour en 1 SEHE HaT RHL 527 PAS DEFM 0 MODE 7 8 Pr sentation Ce programme d termine le signe astral en fonction du jour et du mois de naissance Mode d emploi 1 Entrer le jour et le mois de naissance EXE 2 Affichage du signe astral EXE pour continuer 3 Pour refaire l op ration presser O ENCORE OIN sinon N KEY Programme LIST 18 PRINT
46. la conversion de forces exprim es en unit s d cimales en unit s anglaises Mode d emploi 1 Choisir l option de conversion KEY soit 1 NEWTON DYNES 2 DYNES NEWTON 3 KILOGRAMMES NEWTON 4 NEWTON KILOGRAMMES POUNDS NEWTON 6 NEWTON POUNDS 2 Entrer la mesure dans l unit choisie en 1 EXE 3 Affichage du r sultat EXE pour continuer 4 A l affichage de ENCORE OJ presser O pour une autre conversion ou N pour arr ter KEY Programme 28 PRINT 1r2 3 4 Za PRINT R INPUT S76 TT PRINT F V F 1515 List 38 SETIF pt AT Oy i8 PRINT sewFORCE IF 2t6 7 4RL gm x Sets ug NERTO 1900 zs18e48 NS 118 48 5070 38 58 IMPUT DYMES F y Fe 5t 5 PRI NT Hg 1V260T YA TB INPUT KG POIDS ESV ES9 8T PRINT N 5 5 Vi 3070 3 38 PRINT R IMPUT V 6070 A 8g PRINT R INPUT FiVzFs 2248 PR INT POUNDS ME TI 118 PRINT ENCORE D 128 IF KEYe N PRIN T END ta GOO 128 XERTONS 125 44 ENCORE JR sasFRCE Senn iy s NERTUNS 38 HANDS WEISHI 5 144 ERCORE SN Fiv Fs 182 PRI AA 92 PRINT NT eg PAIDS 128 IF KEY 0 THEN waor ig a e aa Exemples DES SENTONS 2 958617284 8s ENCORE 8 tas FORCE Ses 273747546 sas F RCES Ra 48 POIDS HEAD Ta Yaita YA za NENTORS SEATS 294 21 R ERCORE D N JYXES 22781258 zxsFORCES es ENCORE D N MIL ssa RCES et 2NS7 UI INE KS IS 318 PAS DEFM 0 MODE 7 8
47. le jeu de Nim est un jeu de logique o l ordinateur se r v le tre un adversaire de premier ordre Mode d emploi 1 Le jeu consiste retirer alternativement avec le programme un nombre d allumettes d un tas quelconque en vitant d h riter de la derni re 2 Indiquer la pile d allumettes de d part 20 EXE 3 Pr ciser si le gagnant sera celui qui aura la derniere allumette ou au contraire la laissera l adversaire Soit 1 dans le premier cas et 2 dans le second EXE 4 Pour commencer le premier presser O ENTAME OIN KEY 5 Retirer un nombre d allumettes compris entre 1 et 3 EXE l ordinateur joue apr s que le coup soit entr et ainsi de suite jusqu la fin pr cis e en 3 6 Pour rejouer presser O ENCORE O N sinon N EY Programme LIS 28 INPUT SRGMAMT 18 PRINT JEU DE 1725 8 NDIM EE EC 48 PRINT EHTRME 4 APP 28 INPUT PILE THF TC THEN 2 9 38 IF KEY 0 THEN 158 P 9 C4IHT 0 0 HIF PURPA 168 F PAPA 258 PRINT J ai PER Dur 268 PRINT ENCORE 0 178 T T P PRINT Je N 2 PRINT prenas P 218 iF pem THEN 3 188 PRINT Reste 188 T IF S THEM FE RETURN zaa F grew 138 194 INPUT VOTRE CO END 118 iF DOM TH UP PHF PA 298 5970 778 EN 158 F P Ns F PeT TH 128 PRINT Ie Prend EN 218 ssb au 288 GUTO 198 PERDUIIT SOTO 218 T T PrIF Te80 F 268 5 THEN 258 138 IF DX THEN 128 208 IF T amp IF 8 2 T 148 PRINT Je prend HEN
48. mprunt EXE 3 Pr ciser le taux d int r t en EXE 4 S lectionner le mode de dur e intervenant dans le calcul KEY soit J JOURS M MOIS ANN ES 5 Dans le cas d un calcul sur le nombre de jours pr ciser le point suivant KEY CALCUL O N O pour calculer l nombre de jours entre les deux dates en P1 CALCUL O N N pour indiquer le nombre de jours sans avoir le calculer 6 Indiquer la dur e de l emprunt EXE 7 Affichage de l int r t verser et du total emprunt int r t EXE pour continuer 8 Pour effectuer un nouveau calcul presser O ENCORE OIN sinon N KEY 109 Programme 110 5 VAC SET Fii m 18 PRINT 2 INPUT C 1 la isg F KETs I yanii KEYS I t UH ogpetat THEN za IF KEYS THEN m 58 END 78 INPUT Wb d am 2es amp 1BDTO 158 ga INPUT Nb de wo ist Artet 70 8 EZ eee PRINT d Calcul 9 N 7 ea IF KET 0 0080 3 49 8070 139 119 if KEYEN THEN 188 i28 PRINT INPUT M 5 je jours 138 PRINT Int IDPIPIPIE 321 PAS DEFM 0 MODE 7 8 Pr sentation Utilisable pour r gler les payes en esp ces ce programme per met de connaitre avec exactitude le nombre de pi ces et de billets requis Mode d emploi 1 Indiquer les sommes en francs EXE 2 Presser S pourentrer la somme suivante ou R pour connaitre le r sultat KEY 3 Si Rest press le programme indique pour chaque valeur
49. n c est l inverse qui se produit 3 Le juste poids est signifi par la mention GAGNE et l on peut rejouer en pressant O ENCORE O N sinon N KEY Programme Bt ig POINT rxiOBERV Ales VAE 28 PRINT NIVEAU 1 3 HPRINT 128 S KEY IF dsti IF 25 27 YA 6070 58 48 6670 38 58 7 iSfZe 8 RS t D S SR HINT RRNESZ E IR xci TO 108 78 PRINT CSR 255 8 RECS BC Sg irte INPUT P 128 PRINT ESSAIS 158 5070 158 iR ENCORE ON E Ts PRINT 138 IF KEY 0 THEN 18 148 IF KET N PRTN ET 51 65 IF COR PRINT S 118 iF THEN 128 158 2 11 8 W6 7 8018 R Trop ioin 3010 155 za as 128 FA 155 PRINT PRINT 125 IF p1 THEN 16 fact finn fere 542 PAS DEFM 0 MODE 8 Pr sentation C est l aide d une super catapulte lectronique qu il va falloir d truire morceau par morceau un ch teau ultra r sistant Mode d emploi 1 D s le d part le ch teau gauche a la forme d une matrice pleine et c est l aide de la catapulte droite qu il faut le d truire Pour ce faire ontend la corde en pressant de facon continue sur la touche T KEY Une fois rel ch e le boulet s envole prestement vers son but 2 Si le ch teau est atteint le programme affiche BRAVO et le ch teau devient un et ainsi de suite jusqu au dernier graphisme Il y a donc au total neuf graphismes diff rents qu il faut d truire de la m me facon 3 C est la
50. parait sur l cran il faut m moriser la position CSR 11 et l indiquer suivi de EXE au moment o le programme le demande 4 Le jeu se fait sur dix essais et apr s affichage du score final il convient de presser O pour rejouer ou N pour arr ter KEY Programme LIST 18 PRINT zxsmEMOR Vas vc 28 PRINT MIVERUSR 3 U PRINT ZA FXEY IF 258 IF 2 3 RC 8070 56 48 6010 38 58 PRINT asepe NE Sr jonax eeetie E wit Sa IF KEY THEN 58 78 PRINT Q Qe d F OR Ref 10 18 38 J INT WRMdSQ iFUR K 1 TO 4 38 AKORD J i UANEXT X 188 FOR K 3 TO BAL K INT RAMESIZ K 118 FOR K 1 TO 4 PR INT CSR ACK 4 At 60S0B 25 SIMENTI K PRINT 128 IF RAMEeL DO 5A THEN 98 NT RRMRAM 168 PRINT exskRRVO 218 PRINT C est E hu m Last iiH P ERS P PUE 178 NERT R s E R PRINT NOTE 228 IF KEY 0 THEN THE iit 28 t m F rain 198 M L iI HIF 238 IF KEY M PRIN A Sens RUX YIS MOYENI BE t s ip C etait 288 IF 4 HG s BIEN 248 6010 228 iBOPO BUTO 17 1s 258 FUR Z 1 70 QNE 3 XT ZRETURN A es SESMENORY e Qu est le Exempli XIEN 8 3 7 5 kia sas MESERUXE isee t f etait 3 Ju est ie a t a TERRANO les dex t E i a 1 v z2 E Bu est Le x Z E it le ndi id i C etait 18 FESBRAWO Li 5n 29 530 PAS DEFM 0 MODE 7 8 Pr sentation Commun ment appel jeu des allumettes
51. r le num rateur A et le d nominateur B EXE 2 Affichage de la suite de d cimales 3 Faire STOP pour arr ter le programme ABIBT ITS 362 318 848 579 Dos E 718 144 327 536 231 LIST 5 318 948 579 718 384 57 971 14 492 75 18 PRINT esDIVISi 44 927 536 231 994 1923 188 485 797 1 Des RC 57 37 14 492 753 62 1449 275 362 218 34 28 INPUT 5 8 7198 485 797 18 4 3 579 718 144 927 55 SAAB Gt 2275 362318 848 57 5 231 38457 971 14 3 31718 144 92 536 21 132 752 923 188 45 3 t 2 75 JA D INT R B PRIN i 894 57 971 14 492 797 i01 449 275 187 TES 753 623 188 485 797 113 948 579 718 i44 48 amp lt3 8 098 0 181 449 275 362 218 227 526 211 994 51 5 INT 8 8 848 578 718 144 927 71 14 492 T53 623 18 58 PRINT 0 8070 4 cz5 231 894 57 971 1 3 485 797 191 442 27 a 4 492 753 623 158 48 semi i 2m i 14 977 536 231 Exemple 5797101 Me I xo o3 X 23 4 318 48 579 710 14 4 57 971 14 492 783 D1VISI0ReS 377 536 221 894 57 522 188 485 797 iM BA 47 14 492 752 52 449 275 362 218 940 387 188 485 797 191 443 POL YPIDPIES 200 PAS DEFM 0 MODE 7 8 Pr sentation Ce programme se charge de calculer les images de polyn mes de degr lev tel que Ax 7 Bx 6 Cx 5 DX 4 CX 3 DX 2 Ex F Mode d emploi 1 Pr ciser le degr le plus lev EXE 2 Entrer un un les coefficients EXE 3 Indiquer la valeur de X EXE 4 Affichage de l image EXE pour continuer 5 Pri autre c
52. r refaire un dessin presser O ENCORE OIN sinon N KEY Programme LIST iB POINT Wai ARE Sarsi vi i8 PRINT TRILLES E 3 PRINT 74 AODE Z PRINT ar ARRIERE GO 26 GiDRERE TAILLE 2 9 SR PRINT tasas wa IHT PRIRT 38 C Q D 2 UL F DC 188 GOSUB TR IF 7 i THEM 138 itg 4 tEOR 521 TO Tii e tiM 3T 128 SOSUB 9R FOR F zi TO Ze PRTWT CSR CEA SE RS EXT 118 S SUB 178 R00E SPRINT ENCORE SUN 25 PRINT 148 p ger THEN E E greens UT 188 SAA 148 iTA PRINT ESR Ciam FOR Dei 70 02 PRINT 8st 75 188 NEXT SPRINT amp ETURN apa RR 118 SETURN 117 Exemples 118 sweet RRRES SE TAILLE 1 5 7 CARACTERE PP TEE CEE SCARRE TAILLE ie 38 3 3 3 3 3 3 MPO Oe ce CD vis P GR au a ax as a e w C rss RRRES IAA TAILLE 075 CARACTERE IERAXYAOOHA HOC A MUNERE TAILLE Le AAR NETASF TLESSES USER s E t 1 z t DIA AA WE AA WA Presentation 489 PAS DEFM 0 MODE 7 Pour prouver que les ordinateurs ont aussi de l humour voici un programme qui ne s utilise qu une fois par an Mode d emploi 1 Indiquer le caract re qui servira dessiner le poisson 2 Impression du poisson 3 Un nouveau graphisme s obtient par la pression de O ENCORE ON Programme 2 sinon N KEY 18 POINT ssPOTSS DIE ai SSEL 28 INPUT CARACTER E aas mee n RINT POIMT 18 E 38 PRINT CSR 28
53. rr S 1n 2 2n 2 3n 2 n2 Sn 2 1 6 n n 1 2n 1 3 Pour lesentiers au cube S 1n 3 2n 3 3n 3 n 3 Sn 3 1 n n 1 2 2 Preciser la derniere valeur du calcul EXE 3 Affichage de la somme n des valeurs 4 Pour mettre un autre calcul presser O ENCORE OIN sinon N KEY 118 6010 98 Programme LIST 38 SUTD 38 18 PRINT zssSOMME 28 SOSUB 178 5 0 Sasa ia 8H 2 6010 28 PRINT SOMME 17 It PRINT 58 128 5 068 38 XEY IF a t IF SAJ ZAWALE S 60TD 791648 eps S 6070 38 38 IF KEY 0 THEM 128 INPUT VALEUR 18 188 IF KEY N PRIN T HEND SOME 172 37 i FLEIR ta BJ 139 PAS DEFM 0 MODE 7 8 Pr sentation Ce programme donne le reste d une division de nombres entiers sous la forme d une nombre entier Mode d emploi 1 Entrer le num rateur A et le d nominateur B EXE 2 Affichage du reste EXE pour continuer 3 Pour une autre division presser O ENCORE O N sinon N KEY Programme LIST 48 PRINT FMCORE O 18 PRINT esssESTE 74 2 1 PRINT sri VRC 58 IF KEY 0 THEN 28 INPUT n 8 18 RES PB 5 amp 8 IF KEY N PRIN 8 T 38 PRINT g INT 78 5070 58 R B RESTE 38 8e NT R B Exemple rsriESTE asa ENCORE DM 48127 m 187 SEE 2 62 DEFM 0 MODE 7 8 Pr sentation Ce programme affiche ou imprime toutes les d cimales d une division Mode d emploi 1 Pr cise
54. tte repr sent e par deux parenth ses se dirige gr ce aux touches Z et E et c est en positionnant cette premi re sur 7 n que l on peut le d cimer gr ce la touche KEY 3 Chaque moustique rapporte z point et la partie est not e sur 20 points 4 Presser O pour rejouer sinon N KEY Programme LIST 68 IF KEY THEN 18 PRINT esmoSQUI 54 Test vec 78 PSFR R 1 10 23 PRINT NIVERD ARIE IMT RANEA 73 PRINT iHi 38 SEVIA d 38 FOR Yai 19 24 IF 4 3 2 V8L 98 PRINT CSR YI 5 B0TD 58 IER ka 48 SOTO 38 RINT S8 PRINT asPRET ta IF Yai THEM Jats PRINT aR 48 160 IF KEYs O THEN 8 1 LR IF KEY N PRIN T t END 188 5079 164 198 FOR M 1 TO Ze Ma PRIN T OSR 5 17516 219 218 288 NEXT A 6919 144 218 PRINT FOR U 8 TO S PRINI CSR J e CSR 11 5 a tsMEXT U 228 PRINT 526 5 6 3TD 148 308 PAS DEFM 0 MODE 8 Pr sentation Jeu de logique la balance de Roberval est l exercice r v pour tout apprenti marchand de l gumes Mode d emploi 1 Choisir le niveau de jeu qui d termine l chelle de poids pou vant tre utilis e KEY soit POIDS 0 100 g 0 1000 g 0 10000 g NIVEAU 1 2 3 2 C est en introduisant une suite de masses et en utilisant les indications de la balance que l on arrive d terminerle poids d couvrir Ainsi si la fl che est dirig e vers la gauche cela implique que les masses sont trop nombreuses sino
55. ucun signe pouvant manifester la latence du trouble jusqu la fa meuse rencontre avec un micropoche C est pr cis ment ce moment qu il est possible de d terminer si le sujet y est pr dis pos ou non Sous l emprise instantan e de l objet D apres de r centes tudes on constate une manifestation fla grante de l tat pathologique lors de l approche Le sujet non atteint tapote admire complimente mais ne s arr te pas alors que le sujet atteint se retrouve sous l emprise instantan e de l objet laissant d s lors apparaitre les premieres modifications comportementales Le rapport du professeur Hann a mis en vi dence la transformation du regard qui devient d une trange clart et d une tonnante fixit Vous pouvez vous en rendre compte en regardant celui qui est vautr sur sa machine obser vez l clat de son regard quand il programme D ailleurs vous pouvez le toucher ou faire du bruit il n en sera point g n mais surtout ne la lui retirez pas car il serait pris de convulsions terri bles ou d une innommable fureur accompagn e de larmes et de bave tout fait symptomatiques Un bouleversement peut aussi se produire au niveau des habitudes du sujet Prenons l exemple de celui ci qui peine contamin s est enferm avec l engin dans une salle de bains pendant trois jours et trois nuits refusant m me de s alimenter Pour continuer il a reni femme et enfants pour enfin passer une phase marqu
56. ueur a gagn sinon il est proprement pendu 6 Pour rejouer presser O la question ENCORE O N 7 sinon N KEY Programme 157 58 2 0 F R J i 18 PRINT sssP NBU mi lies VRC 8 Q 0f9R8 C D SEX 28 INPUT VOTRE 20 T4 F7 T LAEMNS T8 IF 3205 THEN 14 IF L7 THEM 28 3 38 INPUT ESSAIS M 28 iF THEN 1 SKI 38 PRINT G igs 10 Li 3 PRINT 24 k ge iret THEN u 148 PRINT 173 IF KEY 9 PRIN pur TS 1 Et TL ESSAIS 188 6070 164 M TP IRL Dk 158 PRINT ENCORE 0 198 PRINT essPEpOu 88CD REY 2 38 N 7 PRINT 242 C etait 138 MEXT I K k 2 80 168 IF KEY O THEM SI 1 10 ia 8 x 2 Exemples VOTRE MOT VOTRE MOT 7 E VOITURE ESSAIS MAXI ESSAIS 841 5 18 F ne 18 xix a 8 E am 2 pirri 4 saiek 8 sE 1 ries E ie enit ox gjet 1 ose 3 pe 1o ii 3 ae P 8 DITUE C etalt KINLA EACORE ON 3 SOIT SDITURE GAGNE I ESSAIS 3 ENCORE DAN 7 25 IERE 340 PAS DEFM 0 MODE 7 8 Pr sentation Exercice de perspicacit ie jeu du nombre secret consiste retrouveren moins de 7 essais un nombre choisi par l ordinateur Mode d emploi 1 Entrer chaque position comprise entre 0 et 100 EXE 2 Affichage d un nombre de c urs proportionnel la proximit du choix 3 Si le bon num ro est trouv avant l puisement des essais le jeu est gagn sinon c est perdu 4 A la question ENCORE ONN r pondr
57. ui a voulu pouser une machine pour tout vous dire il adoptait m me les extensions et devant notre tonnement il a r pondu que ce n tait pas sur un coup de t te car ils avaient bien r fl chi tous les deux Au sujet d une th rapie ventuelle Pour clore l entrevue je l interrogeai sur les moyens th rapeuti ques Sa r ponse semblait quelque peu d sabus e Au sujet d une th rapie ventuelle tout reste d couvrir la d sintoxica tion progressive ne donne aucun r sultat notable les techniques de groupe se sont r v l es totalement inefficaces je dirais m me que nous avons obtenu l effet inverse Une exp rience nous a conduit profiter de leur sommeil pour introduire des program mes compl tement incoh rents dans leur machine Le r sultat fut une cascade de crises de nerfs qui nous co ta tr s cher en mobilier Quant la fausse machine en caoutchouc je vous en pargnerai les d tails tant ce fut catastrophique A vrai dire monsieur la science demeure totalement impuissante devant ce ph nom ne et je crois que je ne suis pas en mesure de vous en apprendre plus Sur cette navrante constatation i m abandonna une r verie plus que justifi e Une s rie de beep me ramena pourtant la r alit Ma petite Huguette s impatientait car cela faisait bien longtemps que je ne lui avais pas caress le clavier et Dieu sait si alle en avait besoin apres ce qu elle venait d entendre G P 11 1
58. uniy uoidioog so0ueiQui seu euiqaeul 1018 wy ap ner audeiboikioec MEL 101ju9 Suse sepiosnuis Ilis p VOSSO 5iudisuba sjueuisss powy anbiguoud jeqeudiy jense euis IBON ap anar seep xnap ajiua kundi ep SiQUON SHHPI NSE sap uOrsJOAU02 amp puunjoA Sp UO SI8AU07 sinanBuo sep uO 630AUDO sgijo8de Sep uojsaeAuo7 piod sap uojJeAuo7 53010 amp amp p uOrS10A007 Sonjezgdue SOp UOIS 9AU07 LI TL LATI LIE Ij LLL QV Achev d imprimer sur les presses de l imprimerie Marcel Bon 70000 Vesoul D p t l gal avril 1984 Ne d diteur 418 No d imprimeur 2766
59. valeur suivante 5 Presser EXE pour retour en 1 Programme 28 ien Kot Is8tiF KETSt9 THEN 28 25 PRINT IMPUT 4 5 de datas i UR 92 WA 54 FH LIST 3B PRINT 3Data b 63 iF Fil THEM 45 5 YA POINT D LIMPHT IO 18 KAA airos TS WERT B BeiNT ti TINEXT EIRERT DF 18 get IF KEYs CU SZ IF KEYS 06 np 2 IERIPSFBUR Del 2R p f 70 3 90 Z ODPRIND OD THEN i4 TQ IAA MODE SIMEXT Bib 15 PRINT PRIMT M O 79 em 5 ode 75 2 3g S CiHel E 113 Exemples Dietrrous Bie Cirors ode 1 8 7 Mode 773 th de datas db se datas Data i iata 1 1 5 256 data 27 au 114 250 PAS DEFM 0 MODE 7 8 Pr sentation Ce programme classe par ordre croissant une s rie de mots entr s dans un ordre quelconque Mode d emploi 1 Entrer un un les mots trier moins de 8 lettres EXE 2 Pour signifier la fin de la saisie entrer la place d un mot EXE 3 Affichage mot par mot de l ordre obtenu EXE pour obtenir le mot suivant 4 Pour un autre classement r pondre O la question EN CORE ONN sinon N KEY L a PETURN 115 Exemples 116 LASSET ru am p fti PE xt 7 Ed FACIRELSA HRES o TA s M Pr sentation Ce programme trace sur imprimante plusieurs carr s de c t s variables Mode d emploi 432 PAS DEFM 0 MODE 7 1 S lectionner par KEY la taille du carr imprimer enc du carr Pou

60 programmes pour CASIO PB-100

Contents

Download Pdf Manuals

Related Search

Related Contents