Micro Systèmes n°34 septembre 1983
Micro Systèmes n°34 septembre 1983
  • Prix facial : 25 F

  • Parution : n°34 de septembre 1983

  • Périodicité : mensuel

  • Editeur : Société Parisienne d'Edition

  • Format : (203 x 271) mm

  • Nombre de pages : 422

  • Taille du fichier PDF : 325 Mo

  • Dans ce numéro : spécial guide du nouvel utilisateur de micro-ordinateurs.

  • Prix de vente (PDF) : gratuit

Dans ce numéro...
< Pages précédentes
Pages : 340 - 341  |  Aller à la page   OK
Pages suivantes >
340 341
10 REM 15 REM 20 REM********OSCILLATIONS LIBRES AMORTIES************ 985 REM 990 REM 995 REM 1000 REMIIIIIIIII11001:11•11111:îneilalidlii1XIIIIIIIIIIIII/Iin 1005 REM 1010 GRAPHC:PRINTCHFS(6):ES=" 1020 A$=" 1030 B$=" 1111 II" 1040 C%=" Il OSCILLATIONS LIBRES AMORTIES il" 1050 CURSOR0,8:PRINTAS:PRINTBS:PRINTCS:PRINTB%:PRINTAS:FOR I=1 TO 3000  : NE X  : FP I NTCHR$ (6) 1060 CURSORO, 0  : PR I NTA$  : PR I NTB$  : PR I NTC$  : PR I NTB$  : PR I NTAS  : CONSOLES5, 24 1985 REM 1990 REM 1995 REM 2000 REM ; IIIIIIIIII3erizEzimIZIffilitilZ1 2005 REM 2010 CURSOR9,7:PRINT"CE PROGRAMME PERMET:" 2020 CURSOR3, 10  : PR INT" *DE CONNAITRE LE REGIME DE FONCTION-" 20:70 CURSOR3, 13  : PR INT "NEMENT D'UN OSCILLATEUR LIBRE AMORTI." 2040 CURSOR3,16:PRINT"*DE VISUALISER LES OSCILLATIONS DU" 2050 CURSOR3,19:PRINT"SYSTEME AU COURS DU TEMPS.":GOSUB 8000 2060 PRINT"*LE COMPORTEMENT D'UN OSCILLATEUR AMORTI" 2070 PRIP1T"-EN REGIME LIBRE- EST TRADUIT PAR UNE":PRINT 2080 PRINT"EQUATION DIFFERENTIELLE DU TYPE:"'2090 CURSOR15,12  : PR INT "  : PR I NT  : PR INT 2100 PRINT"*A,B,C SONT DES CONSTANTES POSITIVES.":PRINT 2110 PRINT"*LA GRANDEUR PHYSIQUE a PEUT SE ":PRINT 2120 PRINT"PRESENTER. SOUS DIFFERENTES FORMES:" 2130 DIMA$(6) 2140 A$(1)="dlele.Ilimliillilleel" 2150 A$(2)="MgqgKel" 2160 A$(3)=" 41.9111.11:114" 2170 A+ (4) =" Waltefflifellffl" 2180 A$).=" 2200 CURSOR1,23:PRINT"reerafieàle1 11Z-WA11.101111111QMZI*11:1001:11011.1kg ; f1":GETWS  : I F W$="" TH EN 2200 2210 CURSOR1,23:PRINTES ; 7770 FOR I=1 TO 2230 CURSOR13,21  : PR I NTAS (I) 2240 FOR J=1 TO 3000:NEXT J 2250 IF I<5 THEN CURSOR1,21:PRINTE% 2260 FOR J=1 TO 3000:NEXT J 2270 NEXT I• 2280 GOSUB 8010:CURSOR0,8 - 2290 PRINT"*LE PARAMETRE B CARACTER I SE L'AMORTISSE-" 2300 PF:INT"MENT DU SYSTEME.EX:COEFFICIENT DE":PRINT 2310 PRINT"FROTTEMENTh,RESISTANCE R, et c "  : PRINT:PRINT:PRINT:PRINT 2320 PRINT"*SI Wamj L'OSCILLATEUR LIBRE EST DIT":PRINT:PRINT"MMUreliJMOIN" 2330 GOSUB 8000 2340 CURSOR4, 10  : FR III*11.111Zblingfflteelelci=1*-111PMALIMIeglItq." 2350 CURSOR 6, 13:PRINT" LIIII•letiekil.iitilitaiR.Zielletlin 1,1"  : 1 808UB 8010 2985 REM 2990 REM 2995 REM marmazum.amei.41e1reilen:1.uri ; Inu1.iT,TILE2 uo(35 REM CUREOF:26:PRINT" 3r.I2O CURSOR2,8  : PR INT"e*MILtla'ffleilIKIIIMPIrallinilled.11fflél"  : 025 E1$=" Fig. 4. - Le programme Basic. 340 - MICRO-SYSTEMES Septembre 1983
3030 CURSOR12.12:PRINT"A=":CURSOR12.16:PRINT"B=":CURSOR12.20:PRINT"C=" 3040 CURSOR13,12:INPUTA:IFA =0 THEN CURSOR1:,12:PRINT El$:GOTO 3040 3050 CURSOR1:.12:PRINT"=" 3060 CURSOR1:.16:INPUT6:1FB 0 THEN CURSOR1:,16:PRENTE1$:GOTO 3060 7070 CURSOR1:,16:PRINT"=" 7080 CURSOR13.20:INPUTC:IFC =0 THEN CURSOR17.20:PRINT El$:6010 3080 3090 CURSOR13.20:PRINT"=" 3100 GOSUB 8010 3110 CURSOR0.10:PRIN1"YO ET'CO REPRESENTENT. A LA DATE t=0, " 3120 PRINT"RESPECTIVEMENT LA GRANDEUR ET SA":PRINT 3130 PRINT"DERIVEE PREMIERE PAR RAPPORT AU TEMPS.":GOSUB S000 3140 CURSOR2,8:PRINT"PRECISEZ LES CONDITIONS INITIALES:":CURSOR13.1PRINT"YO="  : CURSOR12.18:PRINT"Y'0=" 3150 CURSOR15.1INPUTYO:CURSOR15,17:PRINT"=" 3160 CURSOR15.18:INPUTWO:CURSOR15.18:PRIN1"=":GOSUB SOTO:CONSOLE S0,24  : 200 IF (i0=0) * (W0=0) THEN CURSOR12, 10  : PRINTAM111111MG15111:11116:3•1411" CURSOR9. 14  : PRI NT"lialledellIUMnilliziMmee8eler:GOSLIB8000:GOTO:000  : 985 REM  : 990 REM  : 995 REM 4000 4005 REM 4010 D=B 2-4*A*C 4020 IF D=0 THEN 4200 4030 IF D<0 THEN 4:00 4040 REM 4100 REM********ler CAS D 0******** 4105 REM 4110 PRINT TAB(18) ; "â*Ulfflielel:P12101110JAM" 4120 R1=(-B+SOR(D))/(2tA) 4170 R2=(-B-SOR(D))/(2*A> 4140 C1=(W0-YO*R2)/(R1-R2)C2=YO-C1 4150 DEF FNY(T)=C1*EXP(RI*T)+C2*EXP(R2*T) 4155 IF C1*C2 =0 THEN TM=UgGOTO 418U 4160 TM=LN(-R2*C2/(R1*C1))/(R1-R2) 4170 IF TM 0 THEN TM=0 4180 T0=- (1/R1+1/R2)/2:TF=TM+:*T0 4190 GOTO 5000 4195 REM 4200 REM********2em CAS D:.,.0******** 4205 REM 4210 PRINTTAB(16) ; "n1Kffleeigilelfflialie(101414" 4220 R=-8/(2*()) 4270 C2=YO:C1=WO-RCYO 4240 DEF FNY(T)=(C1*T+C2)*EXP(R*T) 4250 TM=-(C1+R*C2)/(R*L1) 4260 IF TM 0 THEN TM=0 4270 T0=-1/R:TF=TM+:*70 4280 GOTO 5000 4290 REM 4:00 REM********:em CAS D 0******** 4305 REM 4310 IF 8=0 THEN PRINT TAP(13):"EnmelliellefflelleilieeMerellfflu:GOTO 4:30 4320 PRINTTAB (18) ; " 01-1411111e1ulleleffelidilaullufflg" 4330 R=-B/(2*A):W=SDRi-D)/(*A) 4340 C2=YO:C1=(WO-R*Y0)/W 4350 DEF FNY ; 1)=(C1*S1N(W*T)4C2*COS(W*T))*EXP(R*1) 4360 TF-20*e/W 4365 IF (8-0)*(Y00)THEN YM=C1:GOT050:0 4370 TM=ATNNR*C24-W*C1)/(W*C2-R*C1))/W 4985 REM 499i) REM 499', PEM Fig. 4 (suite). Septembre 1983 MICRO-SYSTEMES - 341

1 2-3 4-5 6-7 8-9 10-11 12-13 14-15 16-17 18-19 20-21 22-23 24-25 26-27 28-29 30-31 32-33 34-35 36-37 38-39 40-41 42-43 44-45 46-47 48-49 50-51 52-53 54-55 56-57 58-59 60-61 62-63 64-65 66-67 68-69 70-71 72-73 74-75 76-77 78-79 80-81 82-83 84-85 86-87 88-89 90-91 92-93 94-95 96-97 98-99 100-101 102-103 104-105 106-107 108-109 110-111 112-113 114-115 116-117 118-119 120-121 122-123 124-125 126-127 128-129 130-131 132-133 134-135 136-137 138-139 140-141 142-143 144-145 146-147 148-149 150-151 152-153 154-155 156-157 158-159 160-161 162-163 164-165 166-167 168-169 170-171 172-173 174-175 176-177 178-179 180-181 182-183 184-185 186-187 188-189 190-191 192-193 194-195 196-197 198-199 200-201 202-203 204-205 206-207 208-209 210-211 212-213 214-215 216-217 218-219 220-221 222-223 224-225 226-227 228-229 230-231 232-233 234-235 236-237 238-239 240-241 242-243 244-245 246-247 248-249 250-251 252-253 254-255 256-257 258-259 260-261 262-263 264-265 266-267 268-269 270-271 272-273 274-275 276-277 278-279 280-281 282-283 284-285 286-287 288-289 290-291 292-293 294-295 296-297 298-299 300-301 302-303 304-305 306-307 308-309 310-311 312-313 314-315 316-317 318-319 320-321 322-323 324-325 326-327 328-329 330-331 332-333 334-335 336-337 338-339 340-341 342-343 344-345 346-347 348-349 350-351 352-353 354-355 356-357 358-359 360-361 362-363 364-365 366-367 368-369 370-371 372-373 374-375 376-377 378-379 380-381 382-383 384-385 386-387 388-389 390-391 392-393 394-395 396-397 398-399 400-401 402-403 404-405 406-407 408-409 410-411 412-413 414-415 416-417 418-419 420-421 422


Autres parutions de ce magazine  voir tous les numéros


Liens vers cette page
Couverture seule :


Couverture avec texte parution au-dessus :


Couverture avec texte parution en dessous :


Micro Systèmes numéro 34 septembre 1983 Page 1Micro Systèmes numéro 34 septembre 1983 Page 2-3Micro Systèmes numéro 34 septembre 1983 Page 4-5Micro Systèmes numéro 34 septembre 1983 Page 6-7Micro Systèmes numéro 34 septembre 1983 Page 8-9Micro Systèmes numéro 34 septembre 1983 Page 10-11Micro Systèmes numéro 34 septembre 1983 Page 12-13Micro Systèmes numéro 34 septembre 1983 Page 14-15Micro Systèmes numéro 34 septembre 1983 Page 16-17Micro Systèmes numéro 34 septembre 1983 Page 18-19Micro Systèmes numéro 34 septembre 1983 Page 20-21Micro Systèmes numéro 34 septembre 1983 Page 22-23Micro Systèmes numéro 34 septembre 1983 Page 24-25Micro Systèmes numéro 34 septembre 1983 Page 26-27Micro Systèmes numéro 34 septembre 1983 Page 28-29Micro Systèmes numéro 34 septembre 1983 Page 30-31Micro Systèmes numéro 34 septembre 1983 Page 32-33Micro Systèmes numéro 34 septembre 1983 Page 34-35Micro Systèmes numéro 34 septembre 1983 Page 36-37Micro Systèmes numéro 34 septembre 1983 Page 38-39Micro Systèmes numéro 34 septembre 1983 Page 40-41Micro Systèmes numéro 34 septembre 1983 Page 42-43Micro Systèmes numéro 34 septembre 1983 Page 44-45Micro Systèmes numéro 34 septembre 1983 Page 46-47Micro Systèmes numéro 34 septembre 1983 Page 48-49Micro Systèmes numéro 34 septembre 1983 Page 50-51Micro Systèmes numéro 34 septembre 1983 Page 52-53Micro Systèmes numéro 34 septembre 1983 Page 54-55Micro Systèmes numéro 34 septembre 1983 Page 56-57Micro Systèmes numéro 34 septembre 1983 Page 58-59Micro Systèmes numéro 34 septembre 1983 Page 60-61Micro Systèmes numéro 34 septembre 1983 Page 62-63Micro Systèmes numéro 34 septembre 1983 Page 64-65Micro Systèmes numéro 34 septembre 1983 Page 66-67Micro Systèmes numéro 34 septembre 1983 Page 68-69Micro Systèmes numéro 34 septembre 1983 Page 70-71Micro Systèmes numéro 34 septembre 1983 Page 72-73Micro Systèmes numéro 34 septembre 1983 Page 74-75Micro Systèmes numéro 34 septembre 1983 Page 76-77Micro Systèmes numéro 34 septembre 1983 Page 78-79Micro Systèmes numéro 34 septembre 1983 Page 80-81Micro Systèmes numéro 34 septembre 1983 Page 82-83Micro Systèmes numéro 34 septembre 1983 Page 84-85Micro Systèmes numéro 34 septembre 1983 Page 86-87Micro Systèmes numéro 34 septembre 1983 Page 88-89Micro Systèmes numéro 34 septembre 1983 Page 90-91Micro Systèmes numéro 34 septembre 1983 Page 92-93Micro Systèmes numéro 34 septembre 1983 Page 94-95Micro Systèmes numéro 34 septembre 1983 Page 96-97Micro Systèmes numéro 34 septembre 1983 Page 98-99Micro Systèmes numéro 34 septembre 1983 Page 100-101Micro Systèmes numéro 34 septembre 1983 Page 102-103Micro Systèmes numéro 34 septembre 1983 Page 104-105Micro Systèmes numéro 34 septembre 1983 Page 106-107Micro Systèmes numéro 34 septembre 1983 Page 108-109Micro Systèmes numéro 34 septembre 1983 Page 110-111Micro Systèmes numéro 34 septembre 1983 Page 112-113Micro Systèmes numéro 34 septembre 1983 Page 114-115Micro Systèmes numéro 34 septembre 1983 Page 116-117Micro Systèmes numéro 34 septembre 1983 Page 118-119Micro Systèmes numéro 34 septembre 1983 Page 120-121Micro Systèmes numéro 34 septembre 1983 Page 122-123Micro Systèmes numéro 34 septembre 1983 Page 124-125Micro Systèmes numéro 34 septembre 1983 Page 126-127Micro Systèmes numéro 34 septembre 1983 Page 128-129Micro Systèmes numéro 34 septembre 1983 Page 130-131Micro Systèmes numéro 34 septembre 1983 Page 132-133Micro Systèmes numéro 34 septembre 1983 Page 134-135Micro Systèmes numéro 34 septembre 1983 Page 136-137Micro Systèmes numéro 34 septembre 1983 Page 138-139Micro Systèmes numéro 34 septembre 1983 Page 140-141Micro Systèmes numéro 34 septembre 1983 Page 142-143Micro Systèmes numéro 34 septembre 1983 Page 144-145Micro Systèmes numéro 34 septembre 1983 Page 146-147Micro Systèmes numéro 34 septembre 1983 Page 148-149Micro Systèmes numéro 34 septembre 1983 Page 150-151Micro Systèmes numéro 34 septembre 1983 Page 152-153Micro Systèmes numéro 34 septembre 1983 Page 154-155Micro Systèmes numéro 34 septembre 1983 Page 156-157Micro Systèmes numéro 34 septembre 1983 Page 158-159Micro Systèmes numéro 34 septembre 1983 Page 160-161Micro Systèmes numéro 34 septembre 1983 Page 162-163Micro Systèmes numéro 34 septembre 1983 Page 164-165Micro Systèmes numéro 34 septembre 1983 Page 166-167Micro Systèmes numéro 34 septembre 1983 Page 168-169Micro Systèmes numéro 34 septembre 1983 Page 170-171Micro Systèmes numéro 34 septembre 1983 Page 172-173Micro Systèmes numéro 34 septembre 1983 Page 174-175Micro Systèmes numéro 34 septembre 1983 Page 176-177Micro Systèmes numéro 34 septembre 1983 Page 178-179Micro Systèmes numéro 34 septembre 1983 Page 180-181Micro Systèmes numéro 34 septembre 1983 Page 182-183Micro Systèmes numéro 34 septembre 1983 Page 184-185Micro Systèmes numéro 34 septembre 1983 Page 186-187Micro Systèmes numéro 34 septembre 1983 Page 188-189Micro Systèmes numéro 34 septembre 1983 Page 190-191Micro Systèmes numéro 34 septembre 1983 Page 192-193Micro Systèmes numéro 34 septembre 1983 Page 194-195Micro Systèmes numéro 34 septembre 1983 Page 196-197Micro Systèmes numéro 34 septembre 1983 Page 198-199Micro Systèmes numéro 34 septembre 1983 Page 200-201Micro Systèmes numéro 34 septembre 1983 Page 202-203Micro Systèmes numéro 34 septembre 1983 Page 204-205Micro Systèmes numéro 34 septembre 1983 Page 206-207Micro Systèmes numéro 34 septembre 1983 Page 208-209Micro Systèmes numéro 34 septembre 1983 Page 210-211Micro Systèmes numéro 34 septembre 1983 Page 212-213Micro Systèmes numéro 34 septembre 1983 Page 214-215Micro Systèmes numéro 34 septembre 1983 Page 216-217Micro Systèmes numéro 34 septembre 1983 Page 218-219Micro Systèmes numéro 34 septembre 1983 Page 220-221Micro Systèmes numéro 34 septembre 1983 Page 222-223Micro Systèmes numéro 34 septembre 1983 Page 224-225Micro Systèmes numéro 34 septembre 1983 Page 226-227Micro Systèmes numéro 34 septembre 1983 Page 228-229Micro Systèmes numéro 34 septembre 1983 Page 230-231Micro Systèmes numéro 34 septembre 1983 Page 232-233Micro Systèmes numéro 34 septembre 1983 Page 234-235Micro Systèmes numéro 34 septembre 1983 Page 236-237Micro Systèmes numéro 34 septembre 1983 Page 238-239Micro Systèmes numéro 34 septembre 1983 Page 240-241Micro Systèmes numéro 34 septembre 1983 Page 242-243Micro Systèmes numéro 34 septembre 1983 Page 244-245Micro Systèmes numéro 34 septembre 1983 Page 246-247Micro Systèmes numéro 34 septembre 1983 Page 248-249Micro Systèmes numéro 34 septembre 1983 Page 250-251Micro Systèmes numéro 34 septembre 1983 Page 252-253Micro Systèmes numéro 34 septembre 1983 Page 254-255Micro Systèmes numéro 34 septembre 1983 Page 256-257Micro Systèmes numéro 34 septembre 1983 Page 258-259Micro Systèmes numéro 34 septembre 1983 Page 260-261Micro Systèmes numéro 34 septembre 1983 Page 262-263Micro Systèmes numéro 34 septembre 1983 Page 264-265Micro Systèmes numéro 34 septembre 1983 Page 266-267Micro Systèmes numéro 34 septembre 1983 Page 268-269Micro Systèmes numéro 34 septembre 1983 Page 270-271Micro Systèmes numéro 34 septembre 1983 Page 272-273Micro Systèmes numéro 34 septembre 1983 Page 274-275Micro Systèmes numéro 34 septembre 1983 Page 276-277Micro Systèmes numéro 34 septembre 1983 Page 278-279Micro Systèmes numéro 34 septembre 1983 Page 280-281Micro Systèmes numéro 34 septembre 1983 Page 282-283Micro Systèmes numéro 34 septembre 1983 Page 284-285Micro Systèmes numéro 34 septembre 1983 Page 286-287Micro Systèmes numéro 34 septembre 1983 Page 288-289Micro Systèmes numéro 34 septembre 1983 Page 290-291Micro Systèmes numéro 34 septembre 1983 Page 292-293Micro Systèmes numéro 34 septembre 1983 Page 294-295Micro Systèmes numéro 34 septembre 1983 Page 296-297Micro Systèmes numéro 34 septembre 1983 Page 298-299Micro Systèmes numéro 34 septembre 1983 Page 300-301Micro Systèmes numéro 34 septembre 1983 Page 302-303Micro Systèmes numéro 34 septembre 1983 Page 304-305Micro Systèmes numéro 34 septembre 1983 Page 306-307Micro Systèmes numéro 34 septembre 1983 Page 308-309Micro Systèmes numéro 34 septembre 1983 Page 310-311Micro Systèmes numéro 34 septembre 1983 Page 312-313Micro Systèmes numéro 34 septembre 1983 Page 314-315Micro Systèmes numéro 34 septembre 1983 Page 316-317Micro Systèmes numéro 34 septembre 1983 Page 318-319Micro Systèmes numéro 34 septembre 1983 Page 320-321Micro Systèmes numéro 34 septembre 1983 Page 322-323Micro Systèmes numéro 34 septembre 1983 Page 324-325Micro Systèmes numéro 34 septembre 1983 Page 326-327Micro Systèmes numéro 34 septembre 1983 Page 328-329Micro Systèmes numéro 34 septembre 1983 Page 330-331Micro Systèmes numéro 34 septembre 1983 Page 332-333Micro Systèmes numéro 34 septembre 1983 Page 334-335Micro Systèmes numéro 34 septembre 1983 Page 336-337Micro Systèmes numéro 34 septembre 1983 Page 338-339Micro Systèmes numéro 34 septembre 1983 Page 340-341Micro Systèmes numéro 34 septembre 1983 Page 342-343Micro Systèmes numéro 34 septembre 1983 Page 344-345Micro Systèmes numéro 34 septembre 1983 Page 346-347Micro Systèmes numéro 34 septembre 1983 Page 348-349Micro Systèmes numéro 34 septembre 1983 Page 350-351Micro Systèmes numéro 34 septembre 1983 Page 352-353Micro Systèmes numéro 34 septembre 1983 Page 354-355Micro Systèmes numéro 34 septembre 1983 Page 356-357Micro Systèmes numéro 34 septembre 1983 Page 358-359Micro Systèmes numéro 34 septembre 1983 Page 360-361Micro Systèmes numéro 34 septembre 1983 Page 362-363Micro Systèmes numéro 34 septembre 1983 Page 364-365Micro Systèmes numéro 34 septembre 1983 Page 366-367Micro Systèmes numéro 34 septembre 1983 Page 368-369Micro Systèmes numéro 34 septembre 1983 Page 370-371Micro Systèmes numéro 34 septembre 1983 Page 372-373Micro Systèmes numéro 34 septembre 1983 Page 374-375Micro Systèmes numéro 34 septembre 1983 Page 376-377Micro Systèmes numéro 34 septembre 1983 Page 378-379Micro Systèmes numéro 34 septembre 1983 Page 380-381Micro Systèmes numéro 34 septembre 1983 Page 382-383Micro Systèmes numéro 34 septembre 1983 Page 384-385Micro Systèmes numéro 34 septembre 1983 Page 386-387Micro Systèmes numéro 34 septembre 1983 Page 388-389Micro Systèmes numéro 34 septembre 1983 Page 390-391Micro Systèmes numéro 34 septembre 1983 Page 392-393Micro Systèmes numéro 34 septembre 1983 Page 394-395Micro Systèmes numéro 34 septembre 1983 Page 396-397Micro Systèmes numéro 34 septembre 1983 Page 398-399Micro Systèmes numéro 34 septembre 1983 Page 400-401Micro Systèmes numéro 34 septembre 1983 Page 402-403Micro Systèmes numéro 34 septembre 1983 Page 404-405Micro Systèmes numéro 34 septembre 1983 Page 406-407Micro Systèmes numéro 34 septembre 1983 Page 408-409Micro Systèmes numéro 34 septembre 1983 Page 410-411Micro Systèmes numéro 34 septembre 1983 Page 412-413Micro Systèmes numéro 34 septembre 1983 Page 414-415Micro Systèmes numéro 34 septembre 1983 Page 416-417Micro Systèmes numéro 34 septembre 1983 Page 418-419Micro Systèmes numéro 34 septembre 1983 Page 420-421Micro Systèmes numéro 34 septembre 1983 Page 422