chunk_59.json•1.47 kB
{
"id": "chunk_59",
"text": "390 PRINT'Voulez-Vous Entrer les Donnees:' \n400 INPUT' 1 -au Clavier, 2 -en DATA en Fin de Prog.amme •';LDA \n410 \nPRINT:PRINT'Voulez-Vous les Resultats :' \n420 PRINT\" 1 - a l'Ecran seulement.\" \n430 PRINT\" 2 - a l'Ecran et sur l'lmprimante' \n440 PRINT\" 3 - sur l'lmprimante seulement. • \n450 INPUT '•' ;IPE . \n460 IF LDA• l niEN 550 \n470 READIFM \n480 IF IFM• O mEN READ H.L \n490 IF IFM• 1 niEN READ B,H,L \n500 \nIF IFM• 2 THEN READ B,X!N,L \n510 READ EY,ENC.VT \n520 IF ENC• 1 niEN READ MT \n530 READ NX,NC \n540GOT0650 \n550 !NPUT'Section du Pieu: 0 - Circulaire. 1 - Rectangulaire. 2 -Quelconque. •';IFM \n560 \nIF IFM• O mEN INPUT'Diametre et Longueur du Pieu (m): Phi et L• ';CL$:GOSUB \n2810:B•\nU(O):H• U(0):L•U(l):GOTO 590 \n570 \nIF IFM-1 mEN !NPUT\"Largeur, Epaisseur et Longueur du Pieu (m)• ' ;CL$:GOSUB 2810: \nB•U(0):H•\nU(l):L• U(2):GOTO 590 \n580 IF IFM-2 mEN !NPUT'Largeur(m). lnertie(m4) et Longueur du Pieu (m)•';CL$:GOSUB 2810: \nB• U(O):X!N•U(l):L• U(2):GOTO 590 \n590 INPUT\"Module \nd'Young du Beton (MPa)=';EY",
"metadata": {
"book_id": 34848,
"title": "BASIC-STRUCTURAL-Henry-Thonier-Tome-2",
"authors": "Unknown",
"project": "basic_structural",
"content_source": "ocr",
"content_length": 756676,
"chunk_index": 59,
"line_start": 1880,
"line_end": 1910,
"has_formulas": true,
"has_tables": false
}
}