Решить
емкость высоковольтного конденсатора в телевизоре с=6-10-6 ф. параллельно с конденсатором подключен с сопротивлением r=8-10° ом. во время работы телевизора напряжение на конденсаторе u0-34
кв. после выключения телевизора напряжение на конденсаторе убывает до значения u (кв) за время, определяемое выражением t=arc-log2(u,/u) (c). где а=0,8 - постоянная. определите возможное напряжение на конденсаторе, если после выключения телевизора не менее 76,8 секунды. ответ дайте в кв (киловольтах).
2x - 7 = 2
x = 4,5 не целое
при 2,5≤ x ≤4,5 (x - 2,5) + ( 4,5-x)=2
2 = 2
x ∈ [2,5 ; 4,5] целые из них 3 и 4
при x≤ 2,5 (2,5-x) + (4,5-x) =2
7 - 2x = 2
x = 2,5 не целое
ответ: 2 ; 3
б) при x ≥ 2 (x+3) + (x-2) =5
2x +1 = 5
x = 2 целое
при -3 ≤ x ≤ 2 (x+3) + (2-x) = 5
5 = 5 ⇒
x ∈ [ -3 ; 2] из них целые -3; -2; -1; 0; 1; 2
при x ≤ -3 (-x - 3) + (2 -x) = 5
-2x -1 = 5
x = - 3 целое
ответ: -3; -2; -1; 0; 1; 2
uses Crt;
const n=5;
type Vec=array [1..n] of integer;
var A, B, C: Vec;
i,j,k, Col: integer;
Pro: longint;
a1, a2: integer;
begin
ClrScr;
Randomize;
Col:=1; Pro:=1;
WriteLn ('Massiv A:');
for i:=1 to n do
begin
A[i]:=500+random(2000);
Write(A[i]:6);
if A[i] >1000 then
begin
B[Col]:=A[i]; Col:=Col+1;
end;
end; WriteLn;
Col:=Col-1; WriteLn;
WriteLn ('Massiv B:');
for i:=1 to Col do
WriteLn(B[i]);
WriteLn;
k:=1;
for i:=1 to n do
begin
a2:=B[i] mod 10;
a1:=B[i] div 1000;
if sqr(a1)<sqr(a2) then
begin
C[k]:=B[i];
k:=k+1;
end;
end;
for i:=1 to k-1 do
Pro:=Pro*C[i];
WriteLn ('Pro=',Pro);
ReadLn;
end.