chunk_564.json•1.46 kB
{
"id": "chunk_564",
"text": "' NR -Nombre de Ressorts, NC -Nombre de Charges, L • Portee \n200 IF ITR•2 THEN READ NR,NC,L:GOTO 240 \n2 10 \nlNPUT'Nombre de Ressorts •\";NR \n220 lNPUT'Nombre de Charges Concentrees (Charges ou Couples · \";NC \n230 lNPUT'Portee (m) •\";L \n240MM•NR\"2 \n250 NRl•NR+l:NCl=NC+l \n260 DIM XRCNR1),KRCNRl).KTCNR1),RHCNR1),RO(NRl) \n270 DIM XCCNC1).PCNCl),TCNCl) \n280 DIM ACMM+ l.MM+2),U(!4),UMY(!4) \n290 IF Im-1 THEN PRINT\" Abscisse (m), Coell. Charge CMN/m), Coeff. Couple (MNm/mm)\" \n300 FOR I•1 TO NR \n310' Abscisse, Coef. sous Charges Conoentree, Coeff. sous Couple Conoentre \n320 IF ITR•2 rnEN READ XRCI).KRCI),KT(I):GOTO 370 \n330 PRINT USING\"Ressort II# : \";I; \n340 INPUT CL$ \n350 GOSUB 1900 ' Format Ubre \n641 \n\n360 XR(I)•U(O):KR(I)•U(l):KT(I)•U(2) \n370NEXTI \n380 IF NC•O TIIEN 480 \n390 IF ITR- 1 lllEN PRINT\" Abscisse (m), Charge (MN), Couple (MNm) -· \n400 FOR 1• 1 TO NC \n410' Abscisse, Charge Concentree, Couple Concentre \n420 IF ITR• 2 TIIEN READ XC(I),P(I),T(I):GOTO 470 \n430 PRINT USING'Charge U : ' ;I; \n440 INPUT CL$",
"metadata": {
"book_id": 34848,
"title": "BASIC-STRUCTURAL-Henry-Thonier-Tome-2",
"authors": "Unknown",
"project": "basic_structural",
"content_source": "ocr",
"content_length": 756676,
"chunk_index": 564,
"line_start": 20001,
"line_end": 20029,
"has_formulas": true,
"has_tables": false
}
}