Работа состоит из 2-х частей, расположенных на 24 листах; в первой части 5 рисунков, во второй части 2 рисунка; в первой части 2 таблицы, во второй части 3 таблицы, список литературы.
EXCEL, DELPHI, MICROSOFT WORD.
Работа посвящена табулированию заданной функции с записью данных в текстовые файлы.txt, переводу файлов с расширением.txt в формат EXCEL, построению графиков разных видов и выполнению некоторых вычислений. В файлах с расширением.txt столбцы выводятся с разделением в виде пробела. При помощи процедуры RANDOMIZE и генератора случайных чисел RANDOM делается выборка случайных чисел. Согласно данным выборкам создаются программы, выполняющие вычисления математического ожидания и разбиения выборки на интервалы с последующим подсчетом количества попавших в них чисел и построением гистограммы распределения.
При работе использовались:
BORLAND DELPHI 7, MICROSOFT Word, MICROSOFT Excel.
Содержание c
Введение. 4
Исходные данные. 5
а) Табулирование заданной функции. 5
Блок-схема программы для вычисления факториала
б) Случайные величины. 5
1. Табулирование заданной функции.. 6
1.1.Блок-схема алгоритма. 7
1.2 Программа вычисления функции с выводом результата в файл с расширение.txt 8
1.3. Таблица результатов. 9
1.4. Результат вычислений в Excel. 10
1.5. График функции (в приложении Excel). 12
1.6. Столбчатая и круговая диаграммы по результатам таблицы в приложении Excel 13
2.Случайные величины. 14
2.1. Текст программы Random и результаты ее работы. 15
2.1.1. Программа, составляющая последовательность случайных чисел с выводом результатов в файл с расширением.txt. 15
2.1.2. Результаты работы программы п.2.1.1 (Random). 16
2.2 Проверка на статистическую устойчивость: математическое ожидание 17
2.3 Расчет дисперсии, СКВО, ассиметрии, эксцесса для последовательности п.2.1 18
2.4. Границы интервала случайных чисел. 19
2.4.1. Программа, выполняющая разбиение диапазона случайных чисел на 6 равных частей и определяющая их количество в этих промежутках с выводом результатов в файл с расширением.txt. 19
2.4.2. Результаты работы программы п.2.4.1 (интервалы). 20
2.5. Гистограмма распределения по результатам п. 2.4. 21
Заключение. 22
Литература. 23
Приложение. 24
Введение
Настоящая работа выполнена на языке программирования BORLAND DELPHI 7 с использованием приложения MICROSOFT WORD и EXCEL, оформлена в соответствии с ГОСТ 7.32-01.
Исходные данные
а) Табулирование заданной функции
б) Случайные величины
xi = random(40)+random (60)·0.5 — random (80)·0.4; N=6.
Табулирование заданной функции.
1.1. Составить и изобразить блок-схему алгоритма (Word, Paint или другие графические редакторы).
1.2. Составить программу вычислений на языке программирования Delphi с выводом результата в файл с расширением.txt.
1.3. Выполнить вычисления по разработанной программе, записав результаты в виде таблицы с использованием приложения Excel.
основы программирования 6 алгоритмы и блок схемы
1.4. Вычислить сумму и произведение значений аргумента и функции по столбцам, а так же определить max и min значения в столбцах.
1.5. По полученным результатам построить график функции с использованием приложения Excel.
1.6 По результатам таблицы построить столбчатые и круговые диаграммы по столбцам, выбрав наиболее наглядный вид графического отображения
1. Интервал и шаг при табулировании выбран так, чтобы разрыв заданной функции оказался приблизительно в центре. В выбранном интервале должно быть не менее 20 точек.
2. Словесный алгоритм и процедура записи результатов работы программы в Delphi в текстовый файл, относящийся к табулированию функции, оформлены в виде приложения.
Блок-схема алгоритма
Программа вычисления функции с выводом результата в файл с расширение.txt
Таблица результатов
Таблица 1.3. Результат работа программы (файл Alexeev.txt)
Результат вычислений в Excel
Таблица 1.4 Результат вычислений в Excel
| X | Y | a | ||
| -10,00 | -20,00 | |||
| -9,80 | -18,75 | |||
| -9,60 | -17,55 | |||
| -9,40 | -16,41 | Xн | Xк | DX |
| -9,20 | -15,32 | -10 | 0,2 | |
| -9,00 | -14,28 | |||
| -8,80 | -13,29 | |||
| -8,60 | -12,35 | |||
| -8,40 | -11,46 | |||
| -8,20 | -10,61 | |||
| -8,00 | -9,81 | |||
| -7,80 | -9,05 | |||
| -7,60 | -8,33 | |||
| -7,40 | -7,65 | |||
| -7,20 | -7,01 | |||
| -7,00 | -6,40 | |||
| -6,80 | -5,84 | |||
| -6,60 | -5,31 | |||
| -6,40 | -4,81 | |||
| -6,20 | -4,35 | |||
| -6,00 | -3,92 | |||
| -5,80 | -3,51 | |||
| -5,60 | -3,14 | |||
| -5,40 | -2,80 | |||
| -5,20 | -2,48 | |||
| -5,00 | -2,19 | |||
| -4,80 | -1,92 | |||
| -4,60 | -1,68 | |||
| -4,40 | -1,45 | |||
| -4,20 | -1,25 | |||
| -4,00 | -1,07 | |||
| -3,80 | -0,91 | |||
| -3,60 | -0,77 | |||
| -3,40 | -0,64 | |||
| -3,20 | -0,53 | |||
| -3,00 | -0,43 | |||
| -2,80 | -0,34 | |||
| -2,60 | -0,27 | |||
| -2,40 | -0,21 | |||
| -2,20 | -0,16 | |||
| -2,00 | -0,12 | |||
| -1,80 | -0,09 | |||
| -1,60 | -0,06 | |||
| -1,40 | -0,04 | |||
| -1,20 | -0,03 | |||
| -1,00 | -0,02 | |||
| -0,80 | -0,01 | |||
| -0,60 | -0,01 | |||
| -0,40 | -0,01 | |||
| -0,20 | 0,00 | |||
| 0,00 | 0,00 | |||
| 0,20 | 0,00 | |||
| 0,40 | 0,01 | |||
| 0,60 | 0,02 | |||
| 0,80 | 0,04 | |||
| 1,00 | 0,06 | |||
| 1,20 | 0,09 | |||
| 1,40 | 0,12 | |||
| 1,60 | 0,16 | |||
| 1,80 | 0,21 | |||
| 2,00 | 0,27 | |||
| 2,20 | 0,34 | |||
| 2,40 | 0,43 | |||
| 2,60 | 0,52 | |||
| 2,80 | 0,63 | |||
| 3,00 | 0,75 | |||
| 3,20 | 0,89 | |||
| 3,40 | 1,04 | |||
| 3,60 | 1,21 | |||
| 3,80 | 1,40 | |||
| 4,00 | 2,71 | |||
| 4,20 | 2,78 | |||
| 4,40 | 2,85 | |||
| 4,60 | 2,92 | |||
| 4,80 | 2,99 | |||
| 5,00 | 3,06 | |||
| 5,20 | 3,13 | |||
| 5,40 | 3,20 | |||
| 5,60 | 3,26 | |||
| 5,80 | 3,33 | |||
| 6,00 | 3,40 | |||
| 6,20 | 3,47 | |||
| 6,40 | 3,54 | |||
| 6,60 | 3,60 | |||
| 6,80 | 3,67 | |||
| 7,00 | 3,74 | |||
| 7,20 | 3,81 | |||
| 7,40 | 3,87 | |||
| 7,60 | 3,94 | |||
| 7,80 | 4,01 | |||
| 8,00 | 4,08 | |||
| 8,20 | 4,14 | |||
| 8,40 | 4,21 | |||
| 8,60 | 4,28 | |||
| 8,80 | 4,35 | |||
| 9,00 | 4,41 | |||
| 9,20 | 4,48 | |||
| 9,40 | 4,55 | |||
| 9,60 | 4,62 | |||
| 9,80 | 4,68 | |||
| 10,00 | 4,75 | |||
| 0,00 | -124,62 | Сумма | ||
| Произведение | ||||
| -10,00 | -20,00 | Мин | ||
| 10,00 | 4,75 | Макс |
Случайные величины
2.1 С помощью генератора случайных чисел Random в Delphi составить последовательность из более чем 40 случайных чисел (согласно варианту задания). Результат выполнения программы вывести в файл с расширением …1.txt.
2.2 Полученную последовательность проверить на статистическую устойчивость: рассчитать возрастающим итогом математическое ожидание M. Его оценка производится по формуле
Построить график M=f(i), где i =1..n.
2.3 Для всей последовательности полученной в пункте 2.1. рассчитывается дисперсия, среднеквадратическое отклонение, ассиметрия, эксцесс.
2.4 Определить границы изменения случайных чисел (Min и Max). Разбить полученный интервал на N равных частей; определить, сколько чисел попало вкаждую из частей (программа Delphi). Результат расчета вывести в файл. 2.txt. (Исходные данные берутся из файла …1.txt).
2.5 По результатам пункта 2.4. построить гистограмму распределения.
Пункты 2.1, 2.4. выполняются в Delphi.
Пункты 2.2, 2.3, 2.5 выполняются средствами Excel.
Заключение
Результаты работы полностью соответствуют заданию. Разработаны программные коды, построены графики, приведены результаты вычислений в виде таблиц.
Литература
1. Додж М., Кайнет К. Эффективная работа с EXCEL 7.0, СПб: Питер, 1997.
2. MICROSOFT CORP, Ресурсы MICROSOFT OFFICE, M. PRESS, 1997.
3. Персон Р. EXCEL для WINDOWS 95.СПб: BHV – Санкт-Петербург, 1996.
4. Гроздова В.А. Введение в специальность программиста. М.: ИД ФОРУМ – ИНФРА-М, 2007.
5. Бобровский С. Delphi 5:учебный курс. СПб:Питер, 2001
Приложение
Для того, чтобы иметь возможность строить графики функций, получаемых в результате вычислений по соответствующим программам на языке Delphi 7, с использованием приложения EXCEL, нужно числовые данные расчета из программы DELPHI переслать в файл с расширением.txt, который может быть создан пользователем ранее.
Для этого в программе DELPHI должно быть выполнено следующее:
— в разделе описания переменных должна быть описана текстовая переменная, например (F: text);
— после начало главной программы должно следовать обращение к стандартным процедурам
— перед последней в программе операторной скобкой “end”. Записывается стандартная процедура closefile (F);
— стандартная процедура assignfile (F,’File.txt’)связывает текстовую переменную F с некоторым именем файла.txt.
— стандартная процедура rewrite создает новый файл и открывает его для записи и чтения. Если файл с таким именем уже существует, его содержимое стирается, а сам файл открывается заново. Например, оператор rewrite(F); открывает существующий файл, связанный с текстовой переменной F. Стандартная процедура closefile закрывает открытый ранее файл, связанный с указанной в качестве параметра текстовой переменной. Например, оператор closefile (F) закрывает файл, имя которого связано с текстовой переменной F.
КУРСОВАЯ РАБОТА
Источник: infopedia.su
Составить блок схему и программу табулирования двух функций s и y в заданном диапазоне изменения аргумента x — Pascal
составить блок схему и программу табулирования двух функций s и y d в заданном диапазоне изменения аргумента x.Здесь n-число слагаемых суммы s.Результат табулирования вывести в форме следующей таблицы
! x ! y=f(x) ! s !
сумма s —— 1+cos(x)/1!+cos(2x)/2!+. диапазон x —— [0,1;1] функция y —— (e^cosx)*cos(sin(x))
Код к задаче: «Составить блок схему и программу табулирования двух функций s и y в заданном диапазоне изменения аргумента x»
Листинг программы
var n, i, j: integer; x, y, s, b: double; begin repeat write(‘n > 0; n = ‘); readln(n) until n > 0; writeln(‘! x ! y=f(x) ! s !’); for i := 1 to 10 do begin x := 0.1 * i; y := exp(cos(x)) * cos(sin(x)); b := 1; s := 1; for j := 1 to n — 1 do begin b := b / j; s := s + cos(j * x) * b end; writeln(‘!’, x:4:1, ‘ ! ‘, y:0:14, ‘ ! ‘, s:0:14, ‘ !’) end; readln end.
Источник: studassistent.ru
Задание. 1. Составить блок-схему алгоритма табулирования[2] функции одного аргумента
1. Составить блок-схему алгоритма табулирования[2] функции одного аргумента.
2. Вычислить значения функции , на интервале изменения аргумента Х от 1 до 3 с шагом 0,2. При а=2,5; b=0,5.
3. Построить график функции Y.
Алгоритм имеет циклическую структуру
Рис. 4.10. Блок-схема алгоритма
Технология выполнения задания.
1. В ячейку А1 ввести заголовок: Табулирование функции Y=f(x) (рис. 4.13).
2. В ячейку А2 – обозначение аргумента Х, в ячейку В2 – обозначение функции Y, в ячейку С2 – обозначение переменной a, в ячейку D2 – b.
3. В диапазон ячеек А3:А13 ввести значения переменной Х: 1;1,2;1,4…;3, используя способ автозаполнения. Для этого в ячейку А3 ввести 1, в ячейку А4 ввести 1,2. Выделить эти ячейки. Установить указатель мыши на маркере заполнения выделенного диапазона (маленький черный квадрат в правом нижнем углу). Указатель изменится на +. Протащить его вниз до тех пор, пока не получится числовой ряд нужной длины.
4. В ячейку С3 ввести значение 2,5, в ячейку D3 ввести значение 0,5.
5. В ячейку В3 ввести формулу для вычисления функции Y в следующем порядке:
— набрать знак «=», затем щелкнуть левой кнопкой мыши по кнопке Вставка функции в строке формул;
— в открывшемся диалоговом окне Мастер функций установить Категория – Математические, функция – ЕХР, щелкнуть по кнопке OK;
— в открывшемся диалоговом окне Аргументы функции (рис. 4.11) указать аргумент для стандартной функции, щелкнув кнопкой мыши по ячейке А3, затем ввести с клавиатуры знак + и щелкнуть кнопкой мыши по ячейке С3, затем по кнопке OK;
Рис. 4.11. Диалоговое окно Аргументы функции
— в строке формул щелкнуть левой кнопкой мыши и ввести с клавиатуры знак *, затем щелкнуть по кнопке , установить Категория – Математические, функция – КОРЕНЬ, щелкнуть по кнопке OK;
— в открывшемся диалоговом окне Аргументы функции (рис. 4.12) указать аргумент для стандартной функции, щелкнув кнопкой мыши по ячейке D3 затем ввести с клавиатуры знак *, щелкнуть кнопкой мыши по ячейки А3, затем по кнопке OK.
Рис. 4.12. Диалоговое окно Аргументы функции
5. Если формула введена верно, то в ячейке В3 вместо формулы появится результат вычислений, а в строке формул будет отображена формула:
6. Для запрета изменения адреса ячеек С3 и D3 при копировании, выполнить следующие действия: установить курсор в ячейку В3 и щелкнуть левой кнопкой мыши в строке формул перед адресом ячейки С3 и нажать клавишу F4, щелкнуть перед адресом ячейки D3 и нажать клавишу F4, нажать клавишу Enter.
Формула примет вид: =EXP(A3+$C$3)*КОРЕНЬ($D$3*A3).
7. Установить курсор в ячейку В3, подвести указатель мыши к маркеру заполнения этой ячейки и протащить его вниз до ячейки В13. В ячейках В3:В13 получим значения функции Y при соответствующих значениях аргумента.
Рис. 4.13. Результат решения задачи
ПОСТРОЕНИЕ ГРАФИКА ФУНКЦИИ ОДНОГО АРГУМЕНТА
Технология выполнения задания.
1. 
Выделить диапазон ячеек В3:В13.Вызвать Мастер диаграмм, щелкнув по кнопке 
на панели инструментов.
2. В диалоговом окне (рис. 4.14) в списке Тип выбрать График, в списке Вид – График с маркерами, помечающими точки данных. Щелкнуть по кнопке Далее.
Рис. 4.14. Диалоговое окно Тип диаграммы
3. В диалоговом окне (рис. 4.15) высветится образец диаграммы. На вкладке Диапазон данных в текстовом поле Диапазон указан диапазон ячеек: =Лист1!$В$3:$В$13. Выбрать вкладку Ряд (рис. 4.16).
Щелкнуть ЛКМ в текстовом поле Подписи оси Х: и выделить в таблице диапазон ячеек А3:А13. Щелкнуть по кнопке Далее.
Рис. 4.15. Диалоговое окно источник данных Рис. 4.16. Диалоговое окно источник данных
Диаграммы Вкладка Диапазон данных диаграммы Вкладка Ряд
4. В диалоговом окне (рис. 4.17) на вкладке Заголовки ввести название графика, подписи осей х и Y. Выбрать вкладку Легенда (рис. 4.18) и снять флажок Добавить легенду. Щелкнуть по кнопке Далее.
Рис. 4.17. Диалоговое окно параметры диаграммы Рис. 4.18. Диалоговое окно параметры
Вкладка Заголовки диаграммы Вкладка Легенда
5. В диалоговом окне (рис. 4.19)указать команду для размещения графика. Щелкнуть по кнопке Готово.
Рис. 4.19. Диалоговое окно размещение диаграммы
6. Отредактировать диаграмму, задав необходимое положение на листе и размеры, установить белый фон поля.
Рис. 4.20. График функции Y=f(x)
Источник: mydocx.ru