Лист решения экономической задачи

На пятом листе показано решение экономических задач. Решение задач найдено с помощью стандартных экономических функций Exel’я, а именно ППЛАТ и БС.
Заключение

 

Анализ выполненных заданий позволяет судить о том, что использование программных средств для решения разнообразных задач весьма эффективно, будь то задача математического или экономического содержания. Единожды написанная программа осуществляет расчеты в зависимости от введенных данных, которые можно изменять.

Таким образом, появляется возможность:

- анализировать данные и выбирать наиболее оптимальные решения

- автоматизировать выполнение частых и трудоемких операций

- повысить наглядность представляемых данных

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

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

 

1. Харвей Грег. Excel 2000 для Windows для «чайников».: Пер. с англ.: Уч. пособие. – М.: Издательский дом «Вильямс», 2001

2. 2001Хабрейкен Джо. Изучи Microsoft Excel 2002 за 10 минут.: Пер. с англ. – М.: Издательский дом «Вильямс», 2002

3. Фаронов В.В. Турбо Паскаль 7.0. Начальный курс. Учебное пособие. Издание 7-е, переработанное. – М.: «Нолидж», издатель Молгачева С.В.,

4. Васильков Ю.В. Компьютерные технологии вычислений в математическом моделировании: Учеб. Пособие. – М.: Финансы и статистика, 2002

5. Гарнаев А.Ю. Excel, VBA, Internet в экономике и финансах. - Петербург, 2002

 

Приложение №1.

Текст программы на языке Turbo Pascal.

program Batkaeva;

uses crt;

Const

m = 5;

n = 10;

Var

i : integer;

j : integer;

iArray : array[1..m,1..n] of integer;

Begin

clrscr;

for i := 1 to m do

    begin

         for j := 1 to n do

             begin

                  iArray[i,j] := random(90) + 10;

                  write(iArray[i,j],' ');

             end;

         writeln;

    end;

writeln;

for i := 1 to m do

    begin

         for j := n downto 1 do

             write(iArray[i,j],' ');

         writeln;

    end;

readkey;

End.

 

 

 

Рисунок 2.2. Результат работы программы на языке Turbo Pascal.

 

 

Приложение №2.

Рисунок 2.3. Лист презентации.

 

 

Рисунок 2.3. Лист меню.

 

 

 

 

Рисунок 2.4. Лист решения задачи оптимизации.

 

 

Рисунок 2.5. Лист решения нелинейного уравнения.

 

 

                                                                                               Рисунок 2.6. Лист решения системы линейных уравнений.

 

 

 

Рисунок 2.7.Лист решения системы линейных уравнений в MathCad.

 

 

        

Рисунок 2.8.Лист решения экономической задачи