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

Автор работы: Пользователь скрыл имя, 08 Марта 2011 в 18:23, курсовая работа

Описание работы

В данной курсовой работе будет рассмотрено решение задач из ряда высшей математике, это: вычисление определенного интеграла, логарифма

Содержание работы

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

Скачать архив (202.22 Кб) Сколько стоит заказать работу?

Файлы: 8 файлов

Блоксхемы.doc

— 139.00 Кб (Просмотреть файл, Скачать файл)

Дима.курсовая работа.DOC

— 160.00 Кб (Просмотреть файл, Скачать файл)

Введение.doc

— 20.00 Кб (Просмотреть файл, Скачать файл)

Записка.doc

— 392.00 Кб (Просмотреть файл, Скачать файл)

Информатика.doc

— 45.50 Кб (Просмотреть файл, Скачать файл)

Содержание.doc

— 45.00 Кб (Просмотреть файл, Скачать файл)

курсовая работа ГОТОВАЯ.DOC

— 240.00 Кб (Скачать файл)

m[i1,k1]:=0;

for j1:=1 to Nj do

m[i1,k1]:=m[i1,k1]+p[i1,j1]*l[j1,k1];

end;

procedure proizvedenie2(var m:matr; p,l:matr);

var i1,j1,k1:integer;

begin

for i1:=1 to Ni do

for j1:=1 to Nj do

begin

m[i1,j1]:=0;

for k1:=1 to Nk do

m[i1,j1]:=m[i1,j1]+p[i1,k1]*l[k1,j1];

end;

procedure vvod(var m:matr;t:char; Ni1,Nj1:integer);

var i1,j1:integer;

begin

writeln('Ввод матрицы ',t);

for i1:=1 to Ni1 do

for j1:=1 to Nj1 do

begin

write ('Введите ',j1,' -элемент ',i1,' строки:');

readln(m[i1,j1]);

end;

procedure trans(var mt:matr; m:matr; N1:integer);

var i1,j1:integer;

begin

for i1:=1 to N1 do

for j1:=1 to N1 do

mt[i1,j1]:=m[j1,i1];

end;

procedure summa(var m:matr; p,l:matr; Ni1,Nj1:integer);

var i1,j1:integer;

begin

for i1:=1 to Ni1 do

for j1:=1 to Nj1 do m[i1,j1]:=p[i1,j1]+l[i1,j1];

end;

begin

clrscr;

Assign (F,'A:\3.Dat');

rewrite (F);

writeln ('Вычисление матрицы S=At*B*(C+D) ');

writeln (F,'Вычисление матрицы S=At*B*(C+D) ');

vvod(A,'A',Nj,Ni);

vvod(B,'B',Nj,Nk);

vvod(C,'C',Nk,Nj);

vvod(D,'D',Nk,Nj);

trans(At,A,Nj);

writeln ('Транспонированная матрица At:');

writeln (F,'Транспонированная матрица At:');

for i:=1 to Ni do

begin

for j:=1 to Nj do

begin

write (At[i,j]:7:2,' ');

write (F,At[i,j]:7:2,' ');

end;

writeln;

writeln(F);

end;

summa(CD,C,D,Nk,Nj);

writeln ('Сумма матриц C и D:');

writeln (F,'Сумма матриц C и D:');

for k:=1 to Nk do

begin

for j:=1 to Nj do

begin

write (CD[k,j]:7:2,' ');

write (F,CD[k,j]:7:2,' ');

end;

writeln;

writeln(F);

end;

proizvedenie1(AtB,At,B);

writeln ('Произведение матриц At и B:');

writeln (F,'Произведение матриц At и B:');

for i:=1 to Ni do

begin

for k:=1 to Nk do

begin

write (AtB[i,k]:7:2,' ');

write (F,AtB[i,k]:7:2,' ');

end;

writeln;

writeln(F);

end;

proizvedenie2(S,AtB,CD);

writeln ('Результирующая матрица:');

writeln (F,'Результирующая матрица:');

begin

for i:=1 to Ni do

begin

for j:=1 to Nj do

begin

write (S[i,j]:2:2,' ');

write (F,S[i,j]:2:2,' ');

end;

writeln;

writeln(F);

end;

writeln ('Разработал студент гр.Тмду-21 Швецов В.В.');

writeln (F,'Разработал студент гр.Тмду-21 Швецов В.В.');

close(F);

Readkey;

end.

Ручной счет

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

Ввод матрицы А

Введите 1-элемент 1 строки:1

Введите 2-элемент 1 строки:1

Введите 3-элемент 1 строки:1

Введите 1-элемент 2 строки:1

Введите 2-элемент 2 строки:1

Введите 3-элемент 2 строки:1

Введите 1-элемент 3 строки:1

Введите 2-элемент 3 строки:1

Введите 3-элемент 3 строки:1

Введите 1-элемент 4 строки:1

Введите 2-элемент 4 строки:1

Введите 3-элемент 4 строки:1

Ввод матрицы B

Введите 1-элемент 1 строки:1

Введите 2-элемент 1 строки:1

Введите 3-элемент 1 строки:1

Введите 4-элемент 1 строки:1

Введите 5-элемент 1 строки:1

Введите 1-элемент 2 строки:1

Введите 2-элемент 2 строки:1

Введите 3-элемент 2 строки:1

Введите 4-элемент 2 строки:1

Введите 5-элемент 2 строки:1

Введите 1-элемент 3 строки:1

Введите 2-элемент 3 строки:1

Введите 3-элемент 3 строки:1

Введите 4-элемент 3 строки:1

Введите 5-элемент 3 строки:1

Введите 1-элемент 4 строки:1

Введите 2-элемент 4 строки:1

Введите 3-элемент 4 строки:1

Введите 4-элемент 4 строки:1

Введите 5-элемент 4 строки:1

Ввод матрицы С

Введите 1-элемент 1 строки:1

Введите 2-элемент 1 строки:1

Введите 3-элемент 1 строки:1

Введите 4-элемент 1 строки:1

Введите 5-элемент 1 строки:1

Введите 1-элемент 2 строки:1

Введите 2-элемент 2 строки:1

Введите 3-элемент 2 строки:1

Введите 4-элемент 2 строки:1

Введите 5-элемент 2 строки:1

Введите 1-элемент 3 строки:1

Введите 2-элемент 3 строки:1

Введите 3-элемент 3 строки:1

Введите 4-элемент 3 строки:1

Введите 5-элемент 3 строки:1

Введите 1-элемент 4 строки:1

Введите 2-элемент 4 строки:1

Введите 3-элемент 4 строки:1

Введите 4-элемент 4 строки:1

Введите 5-элемент 4 строки:1

Введите 1-элемент 5 строки:1

Введите 2-элемент 5 строки:1

Введите 3-элемент 5 строки:1

Введите 4-элемент 5 строки:1

Ввод матрицы D

Введите 1-элемент 1 строки:1

Введите 2-элемент 1 строки:1

Введите 3-элемент 1 строки:1

Введите 4-элемент 1 строки:1

Введите 5-элемент 1 строки:1

Введите 1-элемент 2 строки:1

Введите 2-элемент 2 строки:1

Введите 3-элемент 2 строки:1

Введите 4-элемент 2 строки:1

Введите 5-элемент 2 строки:1

Введите 1-элемент 3 строки:1

Введите 2-элемент 3 строки:1

Введите 3-элемент 3 строки:1

Введите 4-элемент 3 строки:1

Введите 5-элемент 3 строки:1

Введите 1-элемент 4 строки:1

Введите 2-элемент 4 строки:1

Введите 3-элемент 4 строки:1

Введите 4-элемент 4 строки:1

Введите 5-элемент 4 строки:1

Введите 1-элемент 5 строки:1

Введите 2-элемент 5 строки:1

Введите 3-элемент 5 строки:1

Введите 4-элемент 5 строки:1

Вычисление матрицы S=At*B*(C+D)

Транспонированная матрица At:

1.00 1.00 1.00 1.00

Сумма матриц C и D:

2.00 2.00 2.00 2.00

Произведение матриц At и B:

4.00 4.00 4.00 4.00 4.00

Результирующая матрица:

40.00 40.00 40.00 40.00

титульник1.doc

— 20.50 Кб (Просмотреть файл, Скачать файл)

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