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

UptoLike

ВУЗ: 

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

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

Рубрика: 

gotoxy(4,5); write
('БАЛОК ДВУТАВРОВОГО СЕЧЕНИЯ.РАСЧЕТ ЗАКЛЮЧАЕТСЯ В
ПОДБОРЕ');
gotoxy(4,6); write
('МНОЖЕСТВ ВАРИАНТОВ СЕЧЕНИЙ,НАЧИНАЯ ОТ
МИНИМАЛЬНОЙ ВЫСОТЫ);
gotoxy(4,7); write
('БАЛКИ ДО ВЫСОТЫ 2 МЕТРОВ С ЗАДАННЫМ ШАГОМ
ИЗМЕНЕНИЯ ВЫ
-');
gotoxy(4,8); write
('СОТЫ БАЛКИ.ДЛЯ КАЖДОГО ВАРИАНТА ПОДБИРАЕТСЯ
МИНИМАЛЬНОЕ');
gotoxy(4,9); write
('СЕЧЕНИЕ С НЕОБХОДИМОЙ ПРОВЕРКОЙ ПО ПРОЧНОСТИ И
ЖЕСТКОСТИ);
gotoxy(4,10); write
('ПО РЕЗУЛЬТАТАМ РАСЧЕТА МОЖНО ВЫБРАТЬ
НЕОБХОДИМЫЙ ВАРИАНТ);
gotoxy(4,ll); write
('СЕЧЕНИЯ.СЕЧЕНИЕ МОЖЕТ БЫТЬ ПРИНЯТО
ОПТИМАЛЬНОЕ,ЗАДАННОЙ');
gotoxy(4,12);
write
('ВЫСОТЫ ИЛИ ПРИНЯТО ПО НАЛИЧИЮ СОРТАМЕНТА.ПРОГРАММА НАПИ');
gotoxy(4,13);
write
('САНА НА ЯЗЫКЕ ПАСКАЛЬ В 1998 г.');
gotoxy(4,14);
write
(' АВТОРЫ: МАКАРОВ А.А., МАКАРОВА Н .А.
');
repeat
key:=readkey; if
key=chr(27) then
begin
break;
end;
until false;
End;
Procedure Chapka;
Begin
new_win(l,1,80,25,1);
windl(2,19,78,24,3,0,'y',l);
GOTOXY(4,2);
write('
Для ввода данных установите курсор на соответствующую
позицию с помо
-');
gotoxy(4,3);
write
('щыо стрелок "вверх" и "вниз" и нажмите
ENTER
. Для того
чтобы исправить');

Страницы