Автоматизация процесса расчета стальных конструкций балочной клетки. Макаров А.А - 175 стр.

UptoLike

gotoxy(l.l);
write(nom_f);
assign(f2,nom_f);
rewrite(f2);
writeln(f2,'
ДАННЫЕ
');
writeln(f2,
'————————————————————————————————————————');
writeln(f2,
' 1.
УСИЛИЕ СЖАТИЯ, кг
' ,aa[13:10:1,'
');
writeln(f2,
'———————————————————————————
——————————');
writeln(f2,
' 2.
РАСЧЕТНАЯ ДЛИНА, см
' ,aaC2]: 10:1/
');
writeln(f2,
'——————————
:
——————————————————————————');
writeln(f2, ' 3.
РАСЧЕТНОЕ СОПРОТИВЛЕНИЕ СТАЖ, КГ/СМ2
',аа[3]:10:1,' ');
writeln(f2,
'———————————————————————————————————') ;
writeln(f2);
writeln(f2);
writeln(f2/ РЕЗУЛЬТАТ');
writeln(f2,
'—————————————————————————
——————————' ) ;
writeln(f2, ' 1.
СЕЧЕНИЕ ИЗ ОДНОГО УГОЛКА ПЛОЩАДЬЮ А =
' ,ЬЬС13 :б:2,' ');
writeln(f2,
'———————————————————————————
——————————');
writeln(f2, ' 2.
ТАВРОВОЕ СЕЧЕНИЕ ИЗ ДВУХ УГОЛКОВ А=
',ЬЬС2]:6:2,' ');
writeln(f2,