03.07.2013 Views

Magazine Pom's : la collection

Magazine Pom's : la collection

Magazine Pom's : la collection

SHOW MORE
SHOW LESS

Create successful ePaper yourself

Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.

)T5 1 LUNDI 1 MARDI 1 MERCREDI LES SEPT JOURS DE lJ\ SEMAINE Mercredi<br />

1 JEUDI 1 VENDREDI 1 SAMEDI 1 DIMANCHE<br />

III ITO n.. y A 52 SEMAINES DANS UNE<br />

ANNEE. Une semaine est composée de sept<br />

2) A l'impression, il sort sous <strong>la</strong><br />

fonne :<br />

Programme PROGR.EDIT<br />

jours. Ce sont :<br />

Lundi<br />

Mardi<br />

10 REH ••••• EDITEUR DE TEXTE EDIT<br />

20 REft ••••• G, HISLEUR<br />

30 ses • . " .. : REft SEP"'R ... TEUR DE CH ... IME<br />

40 GOSUS 900<br />

O PRIMT "TOUTE COftft ... MDE SUIVIE DE 1 ENTR ... IN<br />

E": PRIMT .. L· ... FFICH ... GE DE SON ftODE D'E<br />

ftPLOI ,": PRIMT<br />

100 NOs · ".01" : Dlft SOURCES <br />

IF' LEF'TS • ...ND BS < )<br />

THEM BS " RIGHTS :<br />

GOTO 1210<br />

<<br />

•<br />

Jeudi<br />

Vendredi<br />

Samedi<br />

Dimanche<br />

D y a 52 semaInes dans une année.<br />

1220 IF' 8S . STRS (B) THEM RETURM<br />

1230 PRINT DS"PRIW": PRINT "COMM ... NDE INCORRE<br />

CTE": GOTO 200<br />

1500 REft •••••••••••••••••••• COMMANDE U<br />

1510 IF' 8 • 1 THEM 1540<br />

1520<br />

1530<br />

1540<br />

1560<br />

180<br />

1600<br />

1610<br />

1630<br />

1650<br />

1660<br />

1670<br />

2000 .<br />

2010<br />

2020<br />

2040<br />

2050<br />

2060<br />

2110<br />

2120<br />

200<br />

2:505<br />

2510<br />

2:520<br />

2530<br />

2540<br />

2560<br />

270<br />

280<br />

2600<br />

2610<br />

2620<br />

2625<br />

2630<br />

263:5<br />

2636<br />

2640<br />

2650<br />

2670<br />

2680<br />

2690<br />

2700<br />

2710<br />

2750<br />

2760<br />

2770<br />

2790<br />

2810<br />

3000<br />

3020<br />

3030<br />

3040<br />

30'0<br />

IF MIOS (AS.2,l><br />

GOSUB 1200<br />

SCS TH EN 1600<br />

15 • TU(IS>: IF' 15 • 0 THEM 8510<br />

8 • 8 - 1: IF 8 ) 0 THEM 1540<br />

PRIMT SOURCES

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!