2. Практическая часть
2.1 Методика расчётов режимов резания
1. Группа материалов:
1.1 Сталь
Диаметр заготовки [мм]
D=20
Подача для сверления [мм/об]
S=0.4
Определяю осевую силу [Н]
Cp=68; qp=1; yp=0.5; kp=0.88
Скорость резания
Частота вращения шпинделя [об/мин]
Крутящий момент от сил сопротивления при сверлении [Н*м]
См=0.0345; qм=2; yм=0.8
Мощность затрачиваемая на резание [кВт]
1.2 Чугун
Диаметр заготовки [мм]
D=20
Подача для сверления [мм/об]
S=0.6
Определяю осевую силу [Н]
Cp42; qp=0.25; yp=0.25; kmp=0.88
Скорость резания [м/мин]
Определяю крутящий момент Mkp [Н*м]
Определяю частоту вращения шпинделя, соответствующую найденной скорости [об/мин]
Определяю мощность [кВт]
2.2 Составление блок схемы
1. Алгоритм программы
Program Sverlenie;
Var
t, D, S, V, Mat, Cv, Tm, Kv, q, m, y, Mkp, Cm, Kp, q1, x1, y1, Po, Cp, q2, y2, n, Pi, Ne : real;
begin
write ('Введите обрабатываемый материал 1 - сталь, 2 - Чугун Mat = ');
readln (Mat);
Write ('Введите диаметр отверстия D = ');
readln (D);
t:=D/2;
if Mat=1 then if (D=20) then S:=0.4;
if Mat=2 then if (D=20) then S:=0.6;
Tm:=25;
Kv:=0.82;
Kp:=0.88;
Pi:=3.14;
if Mat=1 then Cv:=9.8; q:=0.4; y:=0.5; m:=0.2; Cm:=0.345; q1:=2; x1:=1; y1:=0.8; Cp:=68; q2:=2; y2:=0.8;
if mat=2 then Cv:=14.7; q:=0.25; y:=0.55; m:=0.125; Cm:=0.012; q1:=2.2; x1:=1; y1:=0.8; Cp:=42; q2:=1.2; y2:=0.75;
V:=(Cv*(exp(ln(D)*q))*Kv/(exp(ln(Tm)*m))*(exp(ln(S)*y)))/1000;
Mkp:=10*Cm*(exp(ln(D)*q1))*(exp(ln(t)*x1))*(exp(ln(S)*y1))*Kp;
Po:=10*Cp*(exp(ln(D)*q2))*(exp(ln(S)*y2))*Kp;
n:=1000*V/Pi*D;
Ne:=Mkp*n/9750;
write ('Скорость резанья V = ');
writeln (V);
write ('Крутящий момент Mkp = ');
writeln (Mkp);
write ('Осевая сила Po = ');
writeln (Po);
write ('Количество оборотов n = ');
writeln (n);
write ('Мощность Ne = ');
writeln (Ne);
readln;
end.
2. Блок схема
