chunk_97.json•1.52 kB
{
"id": "chunk_97",
"text": "3430 \nREM--------------------\n3440 REM Aciers des Abaques Section non Circulaire \n34SO IF PHIP• O THEN INPUT'Enrobage (cm)•\";ENR:ENR•ENR/100 \n3460 \nIF FORME •I THEN 3540 \n3470 PRINT' \n1• Un Acier Tendu a Ia Distanced -h-enrobage· \n3480 PRINT' 2· Deux Aciers Symetriques a 'enrobage' et 'd\" \n3490 INPUT \n\"•\";N6 \n3500 D(l)•ENR:D(2)•HT-ENR \n3S10 \nIF N6•1 THEN E(l)•PCENT'SECB \n3S20 \nIF N6•2 THEN E(l)•PCENT\"SECB/2:E(2)•E(l) \n3S30 \nGOTO 3S70 \n3540N6•8 \n3550 AlRA•PCENT'Pif4\"PHIPA2/N8 \n3560 \nGOSUB 5670 \n3S70RETURN \n3S80 \nREM----\n3S90 REM Lecture des Aciers \n3600 IF EL 12>0 THEN 4070 \n3610 N6•0:1F \nFORME•! THEN 3770 \n392 \n36\n20 \n1F IECR•2 THEN 3670 \n363\no pRINT:PRJNT'Aciers BA: d-distance (m) a Ia Fibre Superleure, n • Nornbre de Barres. Phl•Diarnetre \n(rntn>\" . . • \n3640 \npRINT' a Decnre par d CrolSSCll1t \n36\n50 \nlF BP>O THEN PRJNT'(Ne pas Oublier de Decrire l'Acler Passif le Plus Haur \n3\n660 PRINT'et \nl'Acier Passif le plus bas)\" \n3\n670 \n1F IECR•2 THEN READ U(0),U(l),U(2):GOTO 3690 \n36\n80 INPUT\" d net Phi (Fin=O) •\";CL$:GOSUB 2290",
"metadata": {
"book_id": 34848,
"title": "BASIC-STRUCTURAL-Henry-Thonier-Tome-2",
"authors": "Unknown",
"project": "basic_structural",
"content_source": "ocr",
"content_length": 756676,
"chunk_index": 97,
"line_start": 3135,
"line_end": 3183,
"has_formulas": true,
"has_tables": false
}
}