chunk_653.json•1.42 kB
{
"id": "chunk_653",
"text": "il##.ilii';IK1 + I;NOPR$(IKI);ZZB(IKI);ZZH(IKl);ZZS(IK1);ZZI(IKl);ZZI(lKl)/ ZZH(IK1)'20;ZZIY(IKl);SQR(ZZI(lK1)/ \nZZS(IKI));STA(IK1);AV(IK1) \n400 NEXT IKl \n410 LPRINT \n420 \nFOR IKI•l TO NFT \n430 ZZB(IKI)• ZZB(IK1)/U3 \n440 ZZH(IK1)• ZZH(IK1)/\nU3 \n450 ZZI(IK1)• ZZI(IK1)/ U8 \n460 \nZZS(JK1)• ZZS(IK1)/U4 \n470 STA(IK1)•STA(IK1)/U6 \n480 AV(lKl)•AV(IK1)/ U4 \n490NEXTIK1 \n500 RETIJRN \n510REMl-----------------------\n520 REM Donnees au Clavier \n530 IF IDON•2 mEN READ CODE.SE.NP,NMC.NMT:GOTO 590 \n540 \nINPUT'Code (CM66 • 1. EC3 • 2) •';CODE \n550 lNPUT'Lim.ite Elastique (MPa) •';SE \n560 INPUT 'Nombre Total de Poutres CaicuJees - ';NP \n570 INPUT'Nombre Maximum de Charges Concentrees par Poutre •\";NMC \n580 INPUT'Nombre Maximum de Charges Trapezoidales par Poutre •';NMT \n590 DIM PROF$(NP+ I ).NOM$(NP+ l),NPOU$(NP+ l,NMC+ 1).AQ(NP+ l .NMC+ I ) \n600 DIM QI(NP+1.NMT+I),Q2(NP+I,NMT+ I),AI (NP+ I,NMT+ I).A2(NP+ l ,NMT+ I) \n610 DIM NC(NP+ I),NT(NP+ I),L(NP+ I),Q(NP+ 1.NMC+ I),RG(NP+ I),RI)(NP+ I)",
"metadata": {
"book_id": 34848,
"title": "BASIC-STRUCTURAL-Henry-Thonier-Tome-2",
"authors": "Unknown",
"project": "basic_structural",
"content_source": "ocr",
"content_length": 756676,
"chunk_index": 653,
"line_start": 23183,
"line_end": 23210,
"has_formulas": true,
"has_tables": false
}
}