25. В результате применения пенициллина концентрация болезнетворных бактерий в крови...

Question

262 просмотров

25. В результате применения пенициллина концентрация болезнетворных бактерий в крови больного уменьшается на 1/3 в день от содержимого предыдущего дня. Через сколько дней наступит выздоровление, если концентрация бактерий должна уменьшиться от N1 до N2? (N1 > N2). Напишите программу

Информатика Mayb20_zn (46 баллов) 01 Июнь, 18 | 262 просмотров

Дан 1 ответ

Змей24_zn · Answer 1 · 2018-06-01T10:19:28+0000

Условие можно записать так:

$(\frac{1}{3})^d * N_1 \ \textless \ N_2$
$(\frac{1}{3})^d \ \textless \ \frac{N_2}{N_1}$
$log_{ \frac{1}{3} }((\frac{1}{3})^d) \ \textgreater \ \ log_{ \frac{1}{3} }(\frac{N_2}{N_1})$
$d \ \textgreater \ \ log_{ \frac{1}{3} }(\frac{N_2}{N_1})$

begin
var d : real;
var N1: real;
var N2: real;

N1 := 0;
N2 := 0;

while (N1 < N2) or (N1 <= 0) or (N2 <= 0) or (N2 / N1 = 1) do begin<br>    writeln('Введите N1 и N2, N1 > N2: ');
    readln(N1);
    readln(N2);
end;

d := LogN(1.0 / 3.0, N2 / N1);

writeln('Концентрация снизится минимум через, дней: ', d);
end.