Составить программу расчета внесения известкового удобрения по формуле: Д=100*Н / (100-В) (100-К) П, где Н - полная норма СаСО3, т/га; В-влажность извести,%; К - количество недеятельных частиц,%; П - нейтрализующая способность СаСО3, %; Полная норма СаСО3 изменяется в пределах от 2 до 4 т/га с шагом 0,1 т

га

Question

Мокий

4 августа, 21:57

+5

Ответы (1)

Знаете ответ?

Алексеич · Answer 1

Var

H, B, K, P: real;

begin

readln (H, B, K, P) ;

writeln ('Д = ', 100 * H / ((100 - B) * (100 - K) * P)) ;

end.