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

UptoLike

ВУЗ: 

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

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

Рубрика: 

write('i');
q:=aaEl];
1:=
ааС
2];
ryl:=aaC3];
ry2:=aaC4];
гуЗ
:=
аа
[53;
s:=aaC6]; end;
procedure chapca; begin
windl(2,4,78,6,3,0,'n',3);
textcolor(O); gotoxy(3,2); write( '
Hw Tw Bf Tf A DET DET1 F ');
end;
procedure dok;
Begin
new_Win(l,1,80,25,1);
if n=0 then
begin
windl(20,10,60,15,3,0,'yM);
gotoxy(l.l);
write
(' В документировании нет смысла:');
gotoxy(l,2);
write
С' данных нет');
gotoxy(l,4);
write
(' Если хотите получить пустой документ');
gotoxy(l,5);
write
(' нажмите
ENTER
,если не нужен
- ESC');
repeat
key:=readkey;
if key=chr(27) then EXIT;
if key=chr(13) then break;
until false;
end;
new_Win(l,1,80,25,1);
windl(29,6,50,10,3,0,'y',l);

Страницы