Курсовая работа: Разработка технологического процесса для производства листа методом холодной прокатки

Pcp = K2c * nG

x2 = 8 * Pcp * R * 2 * (1 - .3 ^ 2) / 3.14 / 210000!

Lc = SQR(R * dh + x2 ^ 2) + x2

dL = ABS(Lc - L) / L * 100

L = Lc

LOOP UNTIL dL > 5

P = Pcp * b * L

M = 2 * K2c * (y1 - y2) * R * f / dh * b * L

Nw = M * V / R

IF P > Pd OR M > Md OR Nw > Nd THEN h1 = h1 + .001: GOTO 10

PRINT USING "│##│#.##│#.###│#.###│#.###│####│###.##│####.#│##.###│##.##│"; i; Hh0; h0; h1; e; K2c; P / 1000000!; M / 1000000; Nw / 1000000; V

PRINT #1, USING "│##│#.##│#.###│#.###│#.###│####│###.##│####.#│##.###│##.##│"; i; Hh0; h0; h1; e; K2c; P / 1000000!; M / 1000000; Nw / 1000000; V

V = V * h0 / h1: h0 = h1

NEXT

PRINT "└──┴────┴─────┴─────┴─────┴────┴──────┴──────┴──────┴─────┘"

PRINT #1, "└──┴────┴─────┴─────┴─────┴────┴──────┴──────┴──────┴─────┘"

CLOSE 1

END

Приложение Б – Графики распределения параметров прокатки по проходам

ИЗМЕНЕНИЕ ОБЖАТИЯ

Е

ИЗМЕНЕНИЕ СИЛЫ ПРОКАТКИ

Р,МН

ИЗМЕНЕНИЕ МОМЕНТА ПРОКАТКИ

М,кН*м

ИЗМЕНЕНИЕ МОЩНОСТИ