Форум программистов, компьютерный форум, киберфорум
Метрология
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Метрология Предел измерений тензодатчика https://www.cyberforum.ru/ metrology/ thread2788379.html
Здравствуйте, при выполнении курсового возникает ступор при расчете и выборе тензодатчика, а именно как учесть это m min = 0.2 кг. Как я понял это порог чувствительности, а как это отразить в...
Метрология Задачка по механизации
Помогите пожалуйста решить! Статическая характеристика термометра сопротивления имеет вид: Rt=100(1+0.0045·t). Его поместили в камеру с неизвестной температурой. Через некоторое время сопротивление...
Метрология Определить вероятность попадания истинного значения сопротивления в заданный интервал Помогите решить. В результате многократных измерений сопротивления оказалось, что среднее значение сопротивления 42 Ома, дисперсия 9 Ом2 . Считая закон распределения случайной погрешности... https://www.cyberforum.ru/ metrology/ thread2753338.html Метрология Построить график статической характеристики ЦИП и абсолютной погрешности Нужно нарисовать что-то похожее. Только еще должна быть одна линия (измерения с 6 по 10) и max(Δx1и, Δx2и) отобразить на нижнем графике Как это сделать, подскажите пожалуйста? Данные прикрепил https://www.cyberforum.ru/ metrology/ thread2724624.html
Эталон громкости Метрология
Не для кого не секрет, что вопрос измерения громкости звука волнует многих. Однако, предназначенные для этого измерительные приборы - шумомеры имеют весьма внушительную цену, и их покупка для личных...
Метрология Опечатка в ГОСТ 17187-2010 https://www.cyberforum.ru/ metrology/ thread2698847.html
В этом госте приведены формулы для частотной коррекции шумомера, для учёта различия восприятия человеком громкости звука на разных частотах. Для шкалы С формула имеет вид: C(f)=20lg\left-C_{1000}...
Метрология Сколько измерений нужно выполнить, чтобы неопределенность с вероятностью 90% не превысила 0,25% результата измерений? Задача 4 Сколько измерений нужно выполнить данным методом (см. задачу 3), чтобы неопределенность с вероятностью 90% не превысила 0,25% результата измерений? https://www.cyberforum.ru/ metrology/ thread2668420.html Определить, пригоден ли метод для однократных измерений с относительной погрешностью δ Метрология
Задача 3 Для условий задачи 2 (σx=0,02 мм, n=25) определить, пригоден ли метод для однократных измерений с относительной погрешностью δ не более ±0,5%, если известно, что средний диаметр резьбы...
Метрология Оценить вероятность того, что случайная погрешность измерений не превысит указанного значения Задача 2 При изучении метода измерения диаметра резьбы выполнено 25 измерений и установлено, что σx=0,02мм. Нужно оценить вероятность того, что случайная погрешность (доверительный интервал среднего... https://www.cyberforum.ru/ metrology/ thread2668418.html Метрология Определить случайную погрешность результата измерений температуры https://www.cyberforum.ru/ metrology/ thread2668417.html
Задача 1 Определить случайную погрешность результата 36 измерений температуры, если доверительная вероятность Pд=0,95, σx=0,18К.
Метрология Обработка прямых многократных измерений
Задача 5 Задача на обработку прямых многократных измерений В процессе контроля температуры облицовки печи выполнено 11 измерений с помощью цифрового пирометра, характеризующегося относительной...
Метрология Объясните как решать эти задачи https://www.cyberforum.ru/ metrology/ thread2667369.html
Модератор
Эксперт по электронике
7667 / 3830 / 1484
Регистрация: 01.02.2015
Сообщений: 11,842
Записей в блоге: 2
05.04.2021, 08:59 0

ГОСТ Р 8.585-2001 ГСИ. Термопары - Метрология - Ответ 15392202

05.04.2021, 08:59. Показов 2084. Ответов 38
Метки (Все метки)

Ответ

Или же, т.к. один из полиномов для типа M корректно вычисляет - обратную для него функцию не выводить в виде готовой формулы, а значение находить численным методом, решая нелинейное уравнение методом дихотомии (или Ньютона) - там буквально 10-15 итераций, т.к. диапазон измерений для типа M составляет (-200...+100).

Зачем-то же нас учили чисметам?!. Пришла пора применять.

Добавлено через 36 минут
QBasic/QuickBASIC
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
'--------------------------------------------------------------------------
'Вычисление термоЭДС для термопары типа M (ТМК)
'по полиному из
'ГОСТ Р 8.585-2001 ГСИ.
'Термопары. Номинальные статические характеристики преобразования
'
'С учётом поправки ИУС 5-2003.
'Вычисления разбиты на диапазоны:
'1) аппроксимирующий полином E(t) - зависимость термоЭДС от температуры
'-200...+100 °С
'2) обратный аппроксимирующий полином t(E) - зависимость температуры от термоЭДС
'-200...+100 °С
'--------------------------------------------------------------------------
 
FUNCTION Polynomial( x AS DOUBLE, a() AS DOUBLE) AS DOUBLE
        DIM AS DOUBLE r
        r=0
        FOR i AS INTEGER = UBOUND(a) TO LBOUND(a) STEP -1
                r = r*x+a(i)
        NEXT i
        RETURN r
END FUNCTION
 
'зависимость термоЭДС от температуры
FUNCTION E_typeM (T90 AS DOUBLE) AS DOUBLE
        'коэффициенты полинома для вычисления значения термоЭДС по значению
        'температуры рабочего спая
        'для диапазона температур -200...+100 °С
        DIM A(3) AS DOUBLE={ 2.4455560e-6, 4.2638917e-2, 5.0348392e-5, -4.4974485e-8}
        RETURN Polynomial(T90, A())
END FUNCTION
'обратная зависимость температуры от термоЭДС
FUNCTION T_typeM (EMF AS DOUBLE) AS DOUBLE
        'коэффициенты полинома для вычисления температуры рабочего спая по значению
        'термоЭДС
        'для диапазона температур -200...+100 °С
        DIM C(3) AS DOUBLE ={0.4548090, 2.2657698e-2, 7.7935652e-7, 1.1786931e-10}
        RETURN Polynomial(EMF, C())
END FUNCTION
'--------------------------------------------------------------------------
'Т.к. функция из ГОСТ Р 8.585-2001 для термопары типа M вероятно опубликована
'с ошибкой, то измеренную температуру по ТЭДС находим численным методом
'деления отрезка пополам
FUNCTION T_typeM_nm (EMF AS DOUBLE) AS DOUBLE
        DIM AS DOUBLE left_bound, right_bound, middle
        CONST   eps=0.001
        left_bound=-200 'левая граница измеряемого термопарой типа M диапазона
        right_bound=100 'правая граница измеряемого термопарой типа M диапазона
        DO
                middle=left_bound+(right_bound-left_bound)/2
                IF E_typeM(middle)>EMF _
                        THEN right_bound=middle _
                        ELSE left_bound=middle
        LOOP WHILE (right_bound-left_bound)>=eps
        RETURN left_bound+(right_bound-left_bound)/2
END FUNCTION
'--------------------------------------------------------------------------
'проверка вычисления термоЭДС и сравнение с известными константами
SUB test(T90 AS DOUBLE, EMF AS DOUBLE)
        PRINT USING "test t=####, EMF=###.###";T90;EMF
        PRINT "         calc    exact"
        'проверка вычисления термоЭДС и сравнение с известными константами
        PRINT  USING " E(t):  ####.### = ####.###";E_typeM(T90);EMF
        'проверка вычисления температуры и сравнение с известными константами
        PRINT  USING " t(E):  ####.### = ####.###";T_typeM(EMF);T90
        PRINT  USING " t_nm(E):####.### = ####.###";T_typeM_nm(EMF);T90
 
END SUB
'--------------------------------------------------------------------------
'проверка вычисления термоЭДС и сравнение с известными константами
CONST E0  = 0.000 'термоЭДС типа M (ТМК) при 0 °С
CONST E20  = 0.873 'термоЭДС типа M (ТМК) при 20 °С
CONST E100 = 4.722 'термоЭДС типа M (ТМК) при 100 °С
 
'проверка вычисления температуры и сравнение с известными константами
test(0.0, E0)
test(20.0, E20)
test(100.0, E100)
 
'ожидание нажатия любой клавиши
'do
'loop while inkey=""
 
END
Прогонtest t= 0 EMF= 0.000
calc exact
E(t): 0.000 = 0.000
t(E): 0.455 = 0.000
tnm(E): 0.000 = 0.000
test t= 20 EMF= 0.873
calc exact
E(t): 0.873 = 0.873
t(E): 0.475 = 20.000
tnm(E): 20.010 = 20.000
test t= 100 EMF= 4.722
calc exact
E(t): 4.722 = 4.722
t(E): 0.562 = 100.000
tnm(E): 99.992 = 100.000
Теперь уже точно видно, что температура по ТЭДС численным методом даёт приемлемый результат.
Тем более, что на практике температуру точнее 0,1°С даже не отображают, а реально измеренное значение интересно вообще до целых разрядов.

Вернуться к обсуждению:
ГОСТ Р 8.585-2001 ГСИ. Термопары Метрология
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
05.04.2021, 08:59
Готовые ответы и решения:

Обмен с электросчетчиком CE301, СЕ303. ГОСТ Р МЭК 61107-2001
Здравствуйте! Примеров работы по Modbus полно, а вот по МЭК 61107-2001 нигде не встречал ни одного...

Не работает шифрование по ГОСТ 28147-89, ГОСТ Р 34.10-2001,ГОСТ Р 34.11-94 (ASP.NET)
Создавал веб-приложение(ASP.Net) для шифрования по данным гостам, нашёл по данной теме код, но он...

ГОСТ р 34.10-2001
Кто нибудь реализовывал алгоритм ЦП по алгоритму из этого госта?

Реализация ГОСТ Р 34.10-2001
Нужно реализовать стандар Электроной цифровой подписи ГОСТ Р 34.10-2001 на C# (windows form...

38
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
05.04.2021, 08:59

Реализация ГОСТ Р34.11-2001
Всем привет, пытаюсь реализовать ГОСТ р34.11-2001, дошел до проверки ЭЦП, P = u1G + u2Ha, u1, u2...

Как реализовать ГОСТ Р34.11-2001?
Всем привет, пытаюсь реализовать ГОСТ р34.11-2001, дошел до проверки ЭЦП, P = u1G + u2Ha, u1, u2...

Реализация алгоритма ЭЦП ГОСТ 34.10-2001 (или 34.10-1994) на C++
Где можно взять реализацию алгоритма ЭЦП ГОСТ 34.10-2001 (или 34.10-1994) на C++ или может есть у...

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

Проблема с select * from contest Where id_contest='6' and day_contest between #29/07/2001# and #04/08/2001#
Подскажите в чём ошибка! Есть таблица с конкурсными фотографиями из неё должны демонстрироваться...

Lenovo z 585 не включается
Здраствуйте прошу помощи сил уже нет. После синего экрана которой видавал ошибку 0x000000a5 ....

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.