Разделы сайта

Расчёт надёжности схемы увязки

По результатам расчета надежности схемы увязки можно сделать вывод, что при работе в нормальном режиме и правильной эксплуатации она обладает достаточно высокой точностью.

Программа по расчету надежности схемы увязки на ЭВМ.

Расчет надежности с помощью ЭВМ производился по следующей программе, написанной на языке программирования Pascal:

Program Nadeg;V, I, Z: longint;, LL, II:array [1 5] of real;:array [1 200] of real;, S0, T, P: real;:string;:text;(lst, 'result.txt'); rewrite(lst);:=0;[1]:=12; LL[1]:=6.00e-8;[2]:=5; LL[2]:=1.32e-7;[3]:=3; LL[3]:=2.50e-7;[4]:=2; LL[4]:=2.50e-7;[5]:=44; LL[5]:=8.40e-9;('коэффициент нагрузки K='); readln(K);

write ('время наработки V='); readln(V);

str (k, s1); writeln (lst, 'коэффициент нагрузки K='+s1);(V, s1); writeln (lst, 'время наработки V='+s1);(lst, 'I=1-резистор; I=2-конд-р; I=3-транзистор;',

'I=4-индуктивность; I=5-пайка');

writeln (lst, 'введем количество элементов N(I)');(lst, 'введем интенсивность отказов L(I)');

for I:=1 to 5 do begin(lst, 'I=', I, ' N(I)=', NN[I]:5:0, ' L(I)=', LL[I]:10);[I]:=NN[I]*LL[I];:=S0+II[I];;; writeln;(lst, 'время безотказной работы');:=1/(K*S0);(lst, ' T=', T:1:1);

writeln (lst, 'вероятность и время наработки (час)');

for Z:=0 to (V DIV 1000) do begin:=exp (-K*S0*Z*1000);(lst, ' P=', P:1:6, ' Z=', Z*1000);;

close(lst);.

Перейти на страницу: 1 2 

Самое читаемое:

Моделирование процесса контроля и настройки телевизоров
телевизор схема В предлагаемом курсовом проекте рассматривается задача моделирование процесса контроля и настройки телевизоров. Цель курсовой работы - составление и описание модели, моделирование процесса обработки некоторого количества заданий, получение основных характеристик модели исследуемой системы, анализ и интерпретация резул ...

www.techstages.ru : Все права защищены! 2024