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

UptoLike

ВУЗ: 

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

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

Рубрика: 

write(
'—————————————————————————————————');
gotoxy(3,14); write( ' 7.
ДВУТАВРОВОЕ СЕЧЕНИЕ ИЗ ЧЕТЫРЕХ УГОЛКОВ А
= ',ЬЬЕ7]:12:2);
repeat
key:=readkey;
if key=chr(60) then begin
dok; Quite; exit; end;
if key=chr(27) then
begin halt(l); end; until
false;
End;
begin
textbackground(O);
clrscr;
asslgn(fl,'dat.txt');
reset(fl); for i:=l to 70
do read(fl,aCi]); for
i:=l to 70 do
read(fl,zoCi]); for i:=l
to 70 do read(fl,ryo[il);
for i:=l to 70 do
read(fl,bCi]); for i:=l
to 70 do read(fl,ixCi]);
for i:=l to 70 do
read(fl,ixoCi]);

Страницы