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

UptoLike

ВУЗ: 

УлГТУ | Ульяновск

Составители: 

Рубрика: 

Тех
tBackGround(coll);
clrscr; End;
procedure Nachalo;
Begin
new_win(l,1,80,25,1);
windl(8,6,71,20,3,0,'y',3);
gotoxy(7,3);
write
('ПРОГРАММА ПРЕДНАЗНАЧЕНА ДЛЯ ПОДБОРА СЕЧЕНИЙ
ОДНОПРОЛЕТ
-');
gotoxy(4,4); write
('НЫХ СТАТИЧЕСКИ ОПРЕДЕЛИМЫХ СТАЛЬНЫХ БАЛОК. В
РЕЗУЛЬТАТЕ');
gotoxy(4,5); write
(РАСЧЕТА ПОДБИРАЮТСЯ МИНИМАЛЬНО НЕОБХОДИМЫЕ БАЛКИ
ДВУТАВРО);
gotoxy(4,6); write
('ВОГО СЕЧЕНИЯ. ПОДБОР ПРОИЗВОДИТСЯ ДВУХ
ВАРИАНТОВ. ПЕРВЫЙ);
gotoxy(4,7); write
('ВАРИАНТ ИЗ ДВУТАВРА ПО ГОСТ 8239
-
89 , ВТОРОЙ ИЗ
ДВУТАВРА);
gotoxy(4,8); write('C
ПАРАЛЛЕЛЬНЫМИ ГРАНЯМИ ПОЛОК ПО ТУ14
-1-24-72,
ПРИ ЭТОМ');
gotoxy(4,9); write
('ПРИНИМАЮТСЯ БАЛОЧНЫЕ ДВУТАВРЫ. ПОДБОР
СЕЧЕНИЯ БАЛОК');
gotoxy(4,10); write
('ПРОИЗВОДИТСЯ С УЧЕТОМ РАЗВИТИЯ ПЛАСТИЧЕСКИХ
ДЕФОРМАЦИЙ.В);
gotoxy(4,ll); write
('РЕЗУЛЬТАТЕ РАСЧЕТА ВЫДАЕТСЯ ПЛОЩАДЬ
ПОДОБРАННОГО СЕЧЕНИЯ);
gotoxy(4,12);
write
('ПРОГРАММА НАПИСАНА НА ЯЗЫКЕ ПАСКАЛЬ В 1998 г.');
gotoxy(4,13);
write
(' АВТОРЫ: МАКАРОВ А.А., МАКАРОВА Н .А.
'); repeat
key:=readkey; if
key=chr(27) then
begin
break;
end;
until false; End;
Procedure Chapka;

Страницы