chunk_98.json•1.47 kB
{
"id": "chunk_98",
"text": "3\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 \n3690 \nIF U(0)•0 AND U(l)-0 THEN 3820 \n3700 \nlF U(O)>•HT THEN PRINT' Acier en Dehors de Ia Section, Recommencez\":GOTO 3610 \n37ION6•N6+1 \n3720 D(N6)•U(0) \n37\n30 \nIF D(N6)<D(N6-l) THEN PRINT\" ATTENTION. Distances Crotssantes SVP, Recommencez\":GOTO 3610 \n3740 E(N6)•U(l)\"(U(2)/1000)1\\2/4\"PI \n3750 DIT<N6)•U(2) \n3760 \nGOTO 3670 \n3770 \nIF IECR•2 THEN READ U(O),U(l):GOTO 3790 \n3780 \nINPUT'Nornbre de Barres (Pair) et Diarnetre en mm •\";CL$:GOSUB 2290 \n3790 \nIF U(0)<6 THEN PRINT'Le Nornbre de Barres doll Etre Superieur aS. Recommencez\":GOTO 3770 \n3800 \nN6•U(0):AIRA-PI\"(U(l)/1000)1\\2f4:DIAC•U(I) \n3810 GOSUB S670 ' Determination des Aciers en Section Circulaire \n3820 IF N6>0 TIIEN 3840 \n3830 N6•2:D(l)•HT/20:E(I)•.OOOOOOOif:D(2)•.S9\"HT:E(2)•E(I) \n3840 \nIF BP<l THEN 4070 \n38SO NP•O:SECP-0 \n3860 \nIF IECR-2 TIIEN 3940 \n3870 PRINT:PRINT' \nAciers BP: \n3880 PRINT' d -distance (m) a la Fibre Superieure.\" \n3890 PRINT'",
"metadata": {
"book_id": 34848,
"title": "BASIC-STRUCTURAL-Henry-Thonier-Tome-2",
"authors": "Unknown",
"project": "basic_structural",
"content_source": "ocr",
"content_length": 756676,
"chunk_index": 98,
"line_start": 3179,
"line_end": 3216,
"has_formulas": true,
"has_tables": false
}
}