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

UptoLike

ВУЗ: 

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

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

Рубрика: 

begin
with bbCi] do
begin
vvodwindow(2,(6+i),78,(6+i),3,0);
gotoxy(l,l);
writeC |',Hw:8:l,'|',Tw:8:l,'|',Bf:8:l,'|',
Tf:8:l,' ',A:9:1,'|',DE1:9:1,' ',DEll:8:l,'
\F:8:1,' ');
end;
end;
vvodwindow(2,(7+i),78,(7+i),3,0);
gotoxy(l,l); write(
'
—————————————————————————————————————————————————————————————————————————————————————>);
end;
if n<10 then
begin
for i:=l to n do begin
with bbEi] do
begin
vvodwindow(2,(6+i),78,(6+i),3,0);
gotoxy(l,l);
write(' |',Hw:8:l,'|',Tw:8:l,'|',Bf:8:l,'r
f
Tf:8:l,' ',1:9:1,' ',DE1:9:1,' ',DEll:8:l/
*,F:8:1,' ');
end; end;
for i:=n+l to 10 do begin
vvodwindow(2,(6+i),78,(6+i),3,0);
writeC I ' +
1
');
end;
vvodwindow(2,(7+i),78,(7+i),3,0);
gotoxy(l,l);

Страницы