Будь умным!


У вас вопросы?
У нас ответы:) SamZan.net

на тему- ldquo;Исследование среднего арифметического отклонения профиляrdquo; вариант 3

Работа добавлена на сайт samzan.net:

Поможем написать учебную работу

Если у вас возникли сложности с курсовой, контрольной, дипломной, рефератом, отчетом по практике, научно-исследовательской и любой другой работой - мы готовы помочь.

Предоплата всего

от 25%

Подписываем

договор

Выберите тип работы:

Скидка 25% при заказе до 24.11.2024

Министерство образования Республики Беларусь

БЕЛОРУССКИЙ НАЦИОНАЛЬНЫЙ ТЕХНИЧЕСКИЙ УНИВЕРСИТЕТ

Кафедра “Теория механизмов и машин”

Курсовая работа

по информатике

на тему: “Исследование среднего арифметического отклонения профиля”

вариант № 3

Выполнил                                                                                                     

                                                                                                                         Ст. гр.103

Руководитель                                                                                                   

 

Минск 2006

СОДЕРЖАНИЕ

[0.0.1] Минск 2006

[1] СОДЕРЖАНИЕ

[2] 1. ПОСТАНОВКА ЗАДАЧИ

[3] 2. МАТЕМАТИЧЕСКАЯ МОДЕЛЬ РЕШЕНИЯ ЗАДАЧИ

[4]
3. АЛГОРИТМ РЕШЕНИЯ ЗАДАЧИ

[5] 4. СХЕМА АЛГОРИТМА

[6] 5. ТАБЛИЦА ИДЕНТИФИКАТОРОВ

[6.0.1] Наименование

[7] 6. ТЕКСТ ПРОГРАММЫ

[8] РЕЗУЛЬТАТЫ РАБОТЫ ПРОГРАММЫ

[9] 8. ГРАФИЧЕСКАЯ ЧАСТЬ

[10] 9. АНАЛИЗ РЕЗУЛЬТАТОВ

[11] ЛИТЕРАТУРА

1. ПОСТАНОВКА ЗАДАЧИ

При анализе шероховатости по длине вала получена таблично заданная зависимость среднего арифметического отклонения профиля Ra(l) вида

l

l1

l2

ln

Ra

Ra1

Ra2

Ran

Определить значения Ra в точках вала с координатами , используя интерполяционный многочлен Лагранжа. Построить график зависимости Ra(l).

2. МАТЕМАТИЧЕСКАЯ МОДЕЛЬ РЕШЕНИЯ ЗАДАЧИ

Интерполяционный многочлен Лагранжа, построенный по n узлам интерполирования, для поставленной задачи запишется в виде

Для вычисления Raj – среднего арифметического отклонения профиля в точке с координатой воспользуемся соотношением

для каждого j=1, 2, …, k.

Значения исходных данных для тестирования

l, мм

0

6

10

13

15

18

20

24

27

29

Ra, мм

1,9

1,92

1,94

1,96

1,98

1,99

1

0,98

0,97

0,96

=3 мм, =16 мм, =22 мм, =28 мм.


3. АЛГОРИТМ РЕШЕНИЯ ЗАДАЧИ

    1. Вводим исходные данные

   Ввод (n);

Для i=1, n

          Ввод (li)

Для i=1, n

          Ввод (Rai)

   Ввод (k);

Для j=1, k

          Ввод (l1j)

   2. Записываем исходные данные в файл res3. res

Для i=1, n

          Вывод (li)

Для i=1, n

          Вывод (Rai)

    Вычисляем отклонение профиля с использованием функции CL

  1.  Для j=1, k

3.1. Ra1j=0

3.2. Для i=1, n

Ra1j=Ra1j+CL (n, i, j, l1, l, Ra)

    4. Записываем результаты работы в файл res3. res

Для j=1, k

 Вывод (l1j);

Для j=1, k

 Вывод (Ra1j);

Алгоритм функции CL

  1.  CL1=Rai;
  2.  Для p=1, n

Если , то

СL1=

  3. CL=CL1

4. СХЕМА АЛГОРИТМА

Схема головной программы

 Схема функции CL 

 

 

5. ТАБЛИЦА ИДЕНТИФИКАТОРОВ

Наименование

физический смысл

идентификатор

Длина вала

l

l, l1

    Шероховатость поверхности вала

Ra

Ra, Ra1

6. ТЕКСТ ПРОГРАММЫ

Program kyrs3;

Uses crt;

TYPE vect=array[1..100] of real;

Var i,j,n,k:integer;

   l,l1,Ra,Ra1:vect;

   f1,f2:text;

function Cl(n,i,j:integer;l1,l,Ra:vect):real;

        Var p:integer;Cl1:real;

        begin

             CL1:=Ra[i];

             for p:=1 to n do

                 if p<>i then CL1:=CL1*(l1[j]-l[p])/(l[i]-l[p]);

             CL:=CL1

        end;

begin

ClrScr;

assign(f1,'dan3.txt');reset(f1);

assign(f2,'res3.res');rewrite(f2);

readln(f1,n);

for i:=1 to n do read(f1,l[i]);

readln(f1);

for i:=1 to n do read(f1,Ra[i]);

readln(f1);

readln(f1,k);

for j:=1 to k do read(f1,l1[j]);

writeln(f2,'   Kyrsovoi proekt');

writeln(f2,'   Issledovanie srednego arifmeti4eskogo otkloneni9 profil9');

writeln(f2,'   Variant 3');

writeln(f2,'  Isxodnie dannie');

write(f2,'l  ');for i:=1 to n do write(f2,l[i]:2:0,'   ');

writeln(f2);

write(f2,'Ra  ');for i:=1 to n do write(f2,Ra[i]:4:2,' ');

writeln(f2);

writeln(f2,' Reshenie zada4i');

for j:=1 to k do begin

   Ra1[j]:=0;

   for i:=1 to n do

       Ra1[j]:=Ra1[j]+CL(n,i,j,l1,l,Ra);

   end;

write(f2,'l1  ');

for j:=1 to k do write(f2,l1[j]:2:0,'    ');

writeln(f2);

write(f2,'Ra  ');for j:=1 to k do write(f2,Ra1[j]:4:2,' ');

writeln('Rabota zavershena');

repeat until keypressed

end

  1.  РЕЗУЛЬТАТЫ РАБОТЫ ПРОГРАММЫ

  Kyrsovoi proekt

  Issledovanie srednego arifmeti4eskogo otkloneni9 profil9

  Variant 3

 Isxodnie dannie

l   0    6   10   13   15   18   20   24   27   29   

Ra  1.90 1.92 1.94 1.96 1.98 1.99 1.00 0.98 0.97 0.96

Reshenie zada4i

l1   3   16   22    28

Ra  27.17 2.11 0.19 -0.34

8. ГРАФИЧЕСКАЯ ЧАСТЬ

9. АНАЛИЗ РЕЗУЛЬТАТОВ

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

ЛИТЕРАТУРА

  1.  Рапаков Г.Г., РжеуцкаяС.Ю. Тurbo Pascal для студентов и школьников. – СПБ.: БХВ- Петербург, 2004. – 352 с.:ил.

  1.  Анципорович П.П., Алейникова О.И., Булгак Т.И., Луцко Н.Я. Информатика. Учебно-метод. Пособие к лабораторным работам для студ. машиностроит. спец. В 4 ч. – Мн.: БНТУ, 2004.

                                                      

           праааааааааааааааааааааааааааааааааааааааааааааааааааааааааааааааааааааааааа




1. Реферат- Модель покупательского поведения
2. учебая деятельность
3. б-5 А5в-тек d а5втек d А6~-2 есе артады а9а- ~с~улесі А~~7ж~с~улелер
4. Я ~ автор 2013 Омской областной организации ОООИ ВОС Конкурс Я ~ автор 2013 проводится в целях реа
5. Электронная библиотека по философии http---filosof.html
6. УТВЕРЖДАЮ- Директор ГБОУ ДОД ЦРТДЮ ЦСМ Гриднев А
7. Курсовая работа- Локальная вычислительная сеть бухгалтерского отдела
8. скалярна фізична величина що кількісно характеризує потужність переноситься хвилею в напрямку поширення
9. повар Шляндин Виктор МихайловичГород- Санкт
10. Лабораторна робота 1 ОЦІНКА ВИПАДКОВИХ І ГРУБИХ ПОХИБОК КУТОВОЇ ШВИДКОСТІ ОБЕРТАННЯ ДВИГУНА ПОСТІЙНО
11. How to get control of your time nd your life
12. менеджер в образовательное учреждение в-о грамотная речь уверенный пользователь ПК желательно навыки в 1С
13. Этнические и общегражданские аспекты национальной политики в республиках современной России
14. Набуті вади серця у дітей Неревматичні кардити в дітей
15.  Побудова перевіркової матриці ~ а і її результат б для коду 10
16. Психологическая помощь при психических расстройствах
17. Тема 10. Развитие бартерных отношений в России- особенности и тенденции
18.  Характеристика предприятия
19. Дьявол и его свита в романе Булгакова Мастер и Маргарита
20. Кристалл