Помощь - Поиск - Пользователи - Календарь
Полная версия: Задачка про басейн
Форум «Всё о Паскале» > Pascal, Object Pascal > Задачи
JoB
Вот такая вот коротенькая задачка:
Концентрация хлорной извести в бассейне объемом «V» (м^3) составляет 10г\л. Через 1 трубу в бассейн вливают чистую воду с объемной скоростью «0», через другую трубу с такой же скоростью вода выливается из бассейна. При условии идеального перемешивания концентрация хлорной извести изменяется по закону с=с0е^(-0е/v) , где t время, «с0» –начальная концентрация. Определить через какое время концентрация хлорной воды достигнет безопасного для человека уровня 0,1 г/л. Вычислить ф-лю с=с0*e^(-ot/v) при изменении «t» с шагом в 10 мин до тех пор, пока не будет выполнено условие с<=0/1 (согласовать единицы измерения всех величин)
помогите плиз... unsure.gif
volvo
Согласно твоему условию, задача может решаться вот так:
var
V, O: double;
C: double;
T: integer;

const
Ccrit = 100; { 100 г / кубометр }
C0: double = 10000; { 10000 г / кубометр }

begin
V := 2000; { кубометры }
O := 15; { кубометры в минуту }

T := 0;
repeat
Inc(T, 10); { T = T + 10 min }
C := C0 * exp(-O * T / V);
until C < Ccrit;
writeln('T = ', T, ' min');

end.

(можешь добавить ввод O и V)...
JoB
добавил..
СП!
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.