Физика сабаќтарында компьютерді пайдалану



бет50/59
Дата04.11.2022
өлшемі2,49 Mb.
#47406
1   ...   46   47   48   49   50   51   52   53   ...   59
Байланысты:
¨À?Ò?áå îáëûñòû? êàäðëàð á³ë³êò³ë³ã³í àðòòûðó æ?íå ?àéòà äàÿðëàó

Табу керек: Конденсатор астарларының арасындағы ортаның диэлектлік өтімділігін, яғни -?


Шешуі. Конденсатордыңразрядталуы басталған мезетте кон-турдың толық энергиясы -ге тең.
Кедергі R=0 болғандықтан,
электромагниттік тербелістердің энергиясы сақталады


= +
Есептің шарты бойынша:
= , Cu2 = Li2 C=; C=
,
program Elek11_1_4;
Uses crt;
const Pi=3.14;
Ro=8.85E-12;
Var S,d1,L,Im,Um,C,Fs:real;
Begin
clrscr;
Writeln('S=20,d1=1,L=31E-3,Im=2E-3,Um=10,Xkontur=0 engxz');
Readln(S,d1,L,Im,Um);
C:=(sqr(Im)*L)/sqr(Um); Writeln('C=',C);
Fs:=(C*d1)/(Ro*S); Writeln('Fs=',Fs:1);
Readln;
End.
S=20,d1=1,L=31E-3,Im=2E-3,Um=10,Xkontur=0 engxz
20 1 31E-3 2E-3 10
C= 1.2400000000E-09
Fs= 7.0E+00
1.1.5. Идеал тербелмелі контурда кернеудің максимал мәні Um=
28 B, ток күшінің ең үлкен мәні Im=1.4 A. Катушканың магнит өрісінің энергиясы конденсатордың электр өрісінің энергиясына тең болған мезеттегі контурдағы кернеу мен ток күші қандай?
Катушканың магнит өрісінің энергиясы конденсатордың электр өрісінің энергиясына тең болса Wэ =Wм , яғни
CU2 = LI2 I==0,99, U===19,8, (1A;19.8B).


ОПТИКА


1. Температурасы Т λ толқындағы қара дененің шығаратын энер -гиясы E=(2 ·π ·c·h)/ λ5 (e^(ch/BhT)-1) формуласы мен есептеледі. Есептеу программасын жазайық . Мұнда :
C=2,997924 ·108 –жарық жылдамдығы ;
H=6,6252 · 10-34 –Планк тұрақтысы;
B=5,6687 ·10-8 –Больцман тұрақтысы .
Формула өте құрделі болғандықтан есептеуді тізбек тей жүргіземіз: әуелі 2 π ch, онан соң ch/BhT, сонан соң e^(ch/BhT), әрі қарай λ5 ақы -рында Е мәнін табамыз. Осы процестің шешімін блок-схема тілінде жа- зылуы:

M: =C h


N: =2·π · M

K: =M/ B λ T



R: = eK-1




S: = λ5

E: =N/(S+R)





Күрделі процесті жай процеске мүшелеп бөлуге болады, яғни әр блокта бір операцияны қолдануға болады
Тек енгізу, шығару және меншіктеу блоктарын жазу блок-схема тілінде іске асыруға болады.
C*H=M, 2*PI*M=N, M/(B*L*T)=K, EXP(K)-1=R, L5=S, N/(S+R)=E деп белгілейміз .

program Energie(input,output);


const pi=3.1459;
c=2.997924E+8;
h=6.6252E-34;
b=5.6687E-8;
var M,N,K,R,S,E,T,L:real;{L-tolqwnnwnh yzwndwghw}
begin
read(L,T);
M:=C*H;
N:=2*PI*M;
K:=M/(B*L*T);
R:=EXP(K)-1;
S:=L*L*L*L*L;
E:=N/(S+R);
WRITE('ENERGIE TENH',E,'DJOULGE')
END.
Программаны жүргізіп Т=20 , λ= 3.0E-7 берсек
ENERGIE TENH 3.9052113499E –31 DJOULGE деген нәтиже аламыз.




Достарыңызбен бөлісу:
1   ...   46   47   48   49   50   51   52   53   ...   59




©emirsaba.org 2024
әкімшілігінің қараңыз

    Басты бет