Составить программу расчета внесения известкового удобрения по формуле: Д=100*Н/(100-В)(100-К)П, где Н- полная норма СаСО3, т/га; В-влажность извести,%; К- количество недеятельных частиц,%; П- нейтрализующая способность СаСО3, %; Полная норма СаСО3 изменяется в пределах от 2 до 4 т/га с шагом 0,1т
га
Ответы
Ответ дал:
0
var
H, B, K, P: real;
begin
readln(H, B, K, P);
writeln('Д = ', 100 * H / ((100 - B) * (100 - K) * P));
end.
H, B, K, P: real;
begin
readln(H, B, K, P);
writeln('Д = ', 100 * H / ((100 - B) * (100 - K) * P));
end.
Похожие вопросы
2 года назад
2 года назад
7 лет назад
7 лет назад
9 лет назад
9 лет назад
10 лет назад