|
|||||||
АвтоАвтоматизацияАрхитектураАстрономияАудитБиологияБухгалтерияВоенное делоГенетикаГеографияГеологияГосударствоДомДругоеЖурналистика и СМИИзобретательствоИностранные языкиИнформатикаИскусствоИсторияКомпьютерыКулинарияКультураЛексикологияЛитератураЛогикаМаркетингМатематикаМашиностроениеМедицинаМенеджментМеталлы и СваркаМеханикаМузыкаНаселениеОбразованиеОхрана безопасности жизниОхрана ТрудаПедагогикаПолитикаПравоПриборостроениеПрограммированиеПроизводствоПромышленностьПсихологияРадиоРегилияСвязьСоциологияСпортСтандартизацияСтроительствоТехнологииТорговляТуризмФизикаФизиологияФилософияФинансыХимияХозяйствоЦеннообразованиеЧерчениеЭкологияЭконометрикаЭкономикаЭлектроникаЮриспунденкция |
ЗАДАЧА №1Выполнил: Скрипкин Алексей 1) Испытания наблюдения велись за 1077 вентиляторами для ПЭВМ. Испытания проводятся в режиме нормальной эксплуатации до полного отказа всех ламп. Число отказов вентиляторов подсчитывалось в каждом интервале времени Δt=500 часов. Результаты испытаний занесены в таблицу. Пользуясь данными таблицы построить график функции интенсивности отказов от времени и провести анализ этого графика. 2) N-число вентиляторов, Δt-интервал времени, λ(t)- интенсивность отказов, n(t)- число отказавших ко времени t приборов, N(t) – число приборов, оставшихся работоспособными к моменту времени t. 3) 4) Fortran: SUBROUTINE task31
INTEGER i, t, s, k/2/, m/4/ REAL N,Nt, pt, lambda, deltaN(18)
DATA deltaN/60, 200, 197, 150, 128, 72, 40, 30, 7*20, 30, 20,10 /
open(8, FILE="C:\Users\Aleksey Skripkin\Documents\Fortran\out31.txt")
N = 1077.0 t = 3000 s=1
PRINT *, "\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\" PRINT *, "Task #3.1"
WRITE (*, "(A6, 8X, A6, 8X, A6, 8X, A6)") "t ", "d(t) ", "Nt ", "lambda " WRITE (8, "(A6, 1X, A6, 1X, A6, 1X, A6, 1X, A6)") "t ", "d(t) ", "Nt ", "lambda"
DO i=500,9000, 500 Nt=N-deltaN(s)
lambda = (deltaN(s))/(Nt*500)
WRITE (*,"(I10, 3X, F10.5, 3X, F15.7, 3X, F10.8)") i, deltaN(s), Nt, lambda WRITE (8,"(I10, 1X, F10.5, 1X, F15.7, 1X, F10.8)") i, deltaN(s), Nt, lambda
N=N-deltaN(s)
s=s+1
END DO
CLOSE(8)
END SUBROUTINE Task31
Согласно графику интенсивность отказов резко возрастает и достигает наибольшего значения на последних временных интервалах. Это можно объяснить тем, что на этих интервалах значения количеств рабочих устройств и устройств отказывающих различаются не так значительно, как на первых временных интервалах. Поиск по сайту: |
Все материалы представленные на сайте исключительно с целью ознакомления читателями и не преследуют коммерческих целей или нарушение авторских прав. Студалл.Орг (0.003 сек.) |