Пояснительная записка к курсовой работе

Содержание

1. Программирование нестандартных функций --------------------------------------------------- 5
1.1. Постановка задачи -------------------------------------------------------------------------- 5
1.2. Результат машинного и ручного счета -------------------------------------------------- 6
1.3. Вывод ------------------------------------------------------------------------------------------- 6
2.Программирование нестандартных функций --------------------------------------- 7
2.1. Постановка задачи --------------------------------------------------------------------------- 7
2.2. Метод решения ------------------------------------------------------------------------------- 7
2.3.Описание программы ------------------------------------------------------------------------- 8
2.4.Результат машинного и ручного расчета ------------------------------------------------- 9
2.5. Вывод ------------------------------------------------------------------------------------------- 9
3.Операции над матрицами -------------------------------------------------------------------------- 10
3.1. Постановка задачи ---------------------------------------------------------------------------- 10
3.2. Метод решения -------------------------------------------------------------------------------- 10
3.3. Описание программы ------------------------------------------------------------------------ 12
3.4. Результат машинного и ручного расчета ---------------------------------------------- 14
3.5. Вывод ------------------------------------------------------------------------------------------ 15
4.Вычесление определенного интеграла --------------------------------------------------------- 16
4.1. Постановка задачи ----------------------------------------------------------------------------- 16
4.2. Метод решения ------------------------------------------------------------------------------- 16
4.3. Описание программы ------------------------------------------------------------------------ 16
4.4. Результат машинного и ручного расчета ------------------------------------------------ 17
4.5. Вывод ------------------------------------------------------------------------------------------- 18
5. Нахождение максимального и минимального значения функции ----------------------- 19
5.1. Постановка задачи ---------------------------------------------------------------------------- 19
5.2. Метод решения -------------------------------------------------------------------------------- 19
5.3. Описание программы ------------------------------------------------------------------------ 20
5.4. Результат машинного и ручного расчета ----------------------------------------------- 21
5.5. Вывод --------------------------------------------------------------------------------- 21
Заключение ------------------------------------------------------------------------------------ 22 Список литературы ------------------------------------------------------------------------------- 23

Министерство образования Российской Федерации
Ульяновский государственный технический университет
Кафедра “Технология Машиностроения”

Пояснительная записка к курсовой работе
по технологической информатике

Студент Швецов В.В., гр. ТМду-21 Вариант №70

Консультант Крупенников О.Г.

Ульяновск 2005
Министерство образования Российской Федерации
Ульяновский государственный технический университет
Кафедра “Технология машиностроения”

Задание на курсовую работу

Исходные данные для проектирования
Разработать алгоритмы и программы в соответствии с вариантом №70

Составить алгоритм и программу вычисления функции с использованием нестандартных функций.
Составить алгоритм и программу вычисления функции с использованием нестандартных функций и подпрограмм (процедур).
Составить алгоритм и программу операций над матрицами.
при I=3, J=4, K=5.
Составить алгоритм и программу для вычисления определенного интеграла. Число разбиений каждого интервала интегрирования принять равным 10.
, при a=3, b=4.
Составить алгоритм и программу вычисления наибольшего и наименьшего значений функции на интервале [a,b]=[3,6] .


Консультант Крупенников О.Г.

Студент Швецов В.В.

Задание принял к исполнению ”1“ сентября 2005г.
Содержание
стр.
1. Задание №1……………………………………………………………………4
2. Задание №2……………………………………………………………………6
3. Задание №3…………………………………………………………………...10
4. Задание №4…………………………………………………………………...18
5. Задание №5…………………………………………………………………...20
Заключение………………………………………………………………...…24
Список литературы ..………………………………………………………...25

Задание №1
Составить алгоритм и программу вычисления функции с использованием нестандартных функций.
,

Так как в Turbo Pascal нет функции ch(x) поэтому нужно преобразить их с помощью функций, которые распознает Turbo Pascal:
Тогда первоначальную формулу можно представить как:

Ручной счет



Алгоритм программы
Текст программы

Program N1;
uses Crt;
var a,b,x,y:Real;
F:Text;
begin
Clrscr;
Assign (F,'A:\1.Dat');
Rewrite (F);
Writeln ('Вычисление функции с использованием нестандартных функций');
Writeln (F,'Вычисление функции с использованием нестандартных функций');
writeln('y=a*a-b*b+ln(x-a)*ch(x) ');
writeln(F,'y=a*a-b*b+ln(x-a)*ch(x) ');
writeln ('Введите значения а,b,x');
Readln (a,b,x);
y:=a*a-b*b+ln(x-a)*((exp(x)+exp(-x))/2);
Writeln ('y= ',y:3:3);
Writeln (F,'y= ',y:3:3);
Writeln (F);
writeln ('Разработал студент гр.Тмду-21 Швецов В.В.');
writeln (F,'Разработал студент гр.Тмду-21 Швецов В.В.');
Close (F);
Readkey;
end.

Машинный счет

Вычисление функции с использованием нестандартных функции
y=a*a-b*b+ln(x-a)*ch(x)
введите а 3
введите b 2
введите x 4
функция y=5.000
Разработал студент гр.Тмду-21 Швецов В.В.

Вычисление функции с использованием нестандартных функции
y=a*a-b*b+ln(x-a)*ch(x)
введите а 4
введите b 3
введите x 5
функция y=7.000
Разработал студент гр.Тмду-21 Швецов В.В.
Вывод: результаты ручного и машинного счета совпали, следовательно, программа выполнена правильно.
Задание №2
Составить алгоритм и программу вычисления функции с использованием нестандартных функции и подпрограмм (процедур).
Так как в Turbo Pascal нет функций sh(x) поэтому нужно преобразить ее с помощью функций, которые распознает Turbo Pascal:

Также в Turbo Pascal нет факториала, но известно, что
аналогично и для
Ручной счет


Алгоритм программы


Текст программы
Program N2;
uses crt;
var y,x,s,u:real;
m,n: integer;
F:Text;
procedure vvod;
begin
clrscr;
Assign (F,'A:\2.Dat');
Rewrite (F);
writeln ('Вычисление функции с использованием нестандартных функций и процедур');
writeln (F,'Вычисление функции с использованием нестандартных функций и процедур');
writeln ('y=sh(sqrt(x))+(m!-n!)-sqrt(x)');
writeln (F,'y=sh(sqrt(x))+(m!-n!)-sqrt(x)');
write('Введите x= ');
readln(x);
end;
procedure factorial (var m,n:integer);
var a,b:longint;
i:integer;
begin
a:=1;
for i:=1 to n do b:=b*i;
b:=1;
for i:=1 to m do a:=a*i;
m:=a; n:=b;
u:=m-n
end;

procedure sinus;
begin
s:=(exp(sqrt(x))-exp(-sqrt(x)))/2;
writeln('синус гиперболический равен s= ',s:4:2);
end;
procedure functio;
begin
y:=s+u-sqrt(x);
writeln('значение функции равно y= ',y:4:2);
writeln(F,'значение функции равно y= ',y:4:2);
end;
begin
vvod;
writeln('Введите m,n ');
readln(m,n);
factorial (m,n);
sinus;
functio;
writeln ('Разработал студент гр.Тмду-21 Швецов В.В.');
writeln (F,'Разработал студент гр.Тмду-21 Швецов В.В.');
Close (F);
readkey;
end.
Машинный счет

Вычисление функции с использованием нестандартных функций и процедур y=sh(sqrt(x))+(m!-n!)-sqrt(x)
Введите x= 1
Введите m, n 3, 1
гиперболический синус равен u= 1.18
значение функции равно y= 5.18
Разработал студент гр.Тмду-21 Швецов В.В.
Вывод: результаты ручного и машинного счета совпали, следовательно, программа выполнена правильно

Задание№3
Составить алгоритм и программу операций над матрицами.
при I=3, J=4, K=5.

Внимание, отключите Adblock

Вы посетили наш сайт со включенным блокировщиком рекламы!
Ссылка для скачивания станет доступной сразу после отключения Adblock!

Скачать полную версию