Помогите составить программу

В озеро, имеющее среднюю глубину L м и площадь поверхности S кв. км, бросили кристалл поваренной соли массой 0,05 г. Сколько граммов соли оказалось бы в напёрстке воды обьёмом 2 см3, зачёрпнутой из озера. если полагать, что соль растворилась равномерно во всём обьёме вода?

Question

Информатика

Кулина

4 августа, 12:14

Помогите составить программу

В озеро, имеющее среднюю глубину L м и площадь поверхности S кв. км, бросили кристалл поваренной соли массой 0,05 г. Сколько граммов соли оказалось бы в напёрстке воды обьёмом 2 см3, зачёрпнутой из озера. если полагать, что соль растворилась равномерно во всём обьёме вода?

+1

Ответы (1)

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

Таиска · Answer 1

Var

l, s, x: real;

begin

writeln ('Введите площадь и глубину озера:') ;

read (s, l) ;

x:=0.0000001 / (s*l) ;

writeln ('Соли в наперстке объемом 2 см^3: ', x,' г') ;

end.