Составить программу расчета внесения известкового удобрения по формуле: Д=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.
Вас заинтересует
1 год назад
1 год назад
6 лет назад
6 лет назад
8 лет назад
8 лет назад