Программирование и офисные приложения

Размещено на http://www.allbest.ru/

МИНИСТЕРСТВО ОБРАЗОВАНИЯ И НАУКИ РОССИЙСКОЙ ФЕДЕРАЦИИ

Филиал ФГБОУ ВПО "Московского государственного университета технологий и управления имени К.Г. Разумовского" в г.Вязьме Смоленской области

КОНТРОЛЬНАЯ РАБОТА

по дисциплине "Информатика"

по теме: Программирование и офисные приложения

Вязьма, 2013

Часть I.

Задание 1. Составить алгоритм в виде блок-схемы и программу для вычисления арифметического выражения и вывода полученного результата. Ввод соответствующих исходных данных организовать с помощью оператора присваивания.

№	Расчетные формулы	Данные
4	;	а, b, x

Решение:

Блок-схема:

Программа:

using System;

using System.Collections.Generic;

using System.ComponentModel;

using System.Data;

using System.Drawing;

using System.Linq;

using System.Text;

using System.Windows.Forms;

namespace M1

{

public partial class Form1 : Form

{

public Form1()

{

InitializeComponent();

}

private void button1_Click(object sender, EventArgs e)

{

double a = Convert.ToDouble(textBox1.Text);

double b = Convert.ToDouble(textBox2.Text);

double x = Convert.ToDouble(textBox3.Text);

double w = Math.Sqrt(x* x + b)- b * b * Math.Pow(Math.Sin((x + a) / x),3);

double y = Math.Cos(Math.Cos(x* x* x)) - x / Math.Pow(a * a + b * b, 0.5);

label4.Text = "w= " + w.ToString() + " y=" + y.ToString();

}

}

}

Задание 2. Составить алгоритм в виде блок-схемы и программу для решения следующих задач: Вычислить приближенно значение бесконечной суммы с точностью до 0,0005:

Значение n и точность расчетов ввести как константы

Решение:

Блок-схема:

Программа:

using System;

using System.Collections.Generic;

using System.ComponentModel;

using System.Data;

using System.Drawing;

using System.Linq;

using System.Text;

using System.Windows.Forms;

namespace М3

{

public partial class Form1 : Form

{

public Form1()

{

InitializeComponent();

}

private void button1_Click(object sender, EventArgs e)

{

richTextBox1.Clear();

double n = Convert.ToDouble(textBox1.Text);

double ee = Convert.ToDouble(textBox2.Text);

double sum = 1;

double k = 1;

double sl = Math.Pow( (n / ((k+1) * (k + 2) * (k + 3))), 2*k);

while (sl > ee)

{

richTextBox1.AppendText(sl.ToString() + "\n");

sum = sum + sl;

k++;

sl = Math.Pow((n / ((k+1) * (k + 2) * (k + 3))), 2*k);

}

richTextBox1.AppendText("sum=" + sum.ToString());

}

}

}

Задание 3. Задан двумерный массив вещественных чисел размерности 5х5. Определить сумму элементов главной диагонали

Решение:

Программа:

using System;

using System.Collections.Generic;

using System.ComponentModel;

using System.Data;

using System.Drawing;

using System.Linq;

using System.Text;

using System.Windows.Forms;

namespace M4

{

public partial class Form1 : Form

{

public Form1()

{

InitializeComponent();

}

private void button1_Click(object sender, EventArgs e)

{

int[,] mas = new int[5, 5];

Random r = new Random();

string s="";

int sum=0;

for (int i = 0; i < 5; i++)

{

for (int j = 0; j < 5; j++)

{

mas[i, j] = r.Next(10, 20);

if (i == j) sum = sum + mas[i, j];

s = s + mas[i, j].ToString() + "\t";

}

s = s + "\n";

}

s = s + "\n Сумма главн. диаг.=" + sum.ToString();

richTextBox1.Text = s;

}

}

}

Часть II

Задача 4. Продукция двух видов (краска для внутренних (I)  и наружных (E) работ  поступает оптовую продажу. Для производства красок используются два исходных продукта А и В. Максимально возможные суточные запасы этих продуктов составляют 6т и 8 т, соответственно. Расходы продуктов А и В на 1 т соответствующих красок приведены в таблице

Исходный продукт	Расход исходных продуктов (в тоннах) на 1 тонну краски	Максимально возможный запас продукта, тонн
	краска Е	краска I
А	1	2	6
В	2	1	8

Изучение рынка сбыта показало, что суточный спрос на краску I не превышает спроса на краску Е. кроме того установлено, что спрос на краску I  никогда не превышает 2 т в сутки. Оптовые цены одной тонны красок равны 3000 ден. ед для краски E и 2000 ден. ед. для краски I. Какое количество краски каждого вида должна производить фабрика, чтобы доход от реализации продукции был максимальным?

Решение:

Пусть Х₁, Х₂ - планируемый к производству суточный объём производства краски Е и I соответственно (в тоннах). Тогда целевая функция математической модели будет выражать суммарную прибыль от реализации краски обоих видов, а система ограничений - производственные и маркетинговые ограничения, накладываемые на переменные модели.

Таким образом, математическая модель данной задачи будет иметь вид:



Подготовим лист EXCEL к использованию процедуры “Поиск решения”:

в ячейках C2:D2 записываются наименования переменных модели (в общем случае количество ячеек в данном диапазоне равно количеству переменных в соответствующей математической модели);

ячейки C3:D3 резервируются для значений переменных модели, которые будут найдены после выполнения процедуры “Поиск решения”;

в ячейках C4:D4 записывают коэффициенты при переменных модели в целевой функции модели F(X₁, Х₂);

в ячейки C6:D9 (число строк диапазона равно количеству ограничений в системе ограничений математической модели, число столбцов - числу переменных) заносим матрицу коэффициентов при переменных X₁ и Х₂ в системе ограничений модели;

в ячейках G6:G9 записаны правые части системы ограничений модели;

ячейка Е4 (целевая ячейка) резервируется для вычисления оптимального значения целевой функции модели.

Для рассматриваемого примера лист EXCEL будет иметь вид (рис. 1):

Размещено на http://www.allbest.ru/

После занесения исходных данных на лист EXCEL в целевую ячейку Е4 записывают формулу: СУММПРОИЗВ($C$3:$D$3;C4:D4), которую затем копируют с модификацией в ячейки Е6:Е9 (результат представлен на рис. 2):

Размещено на http://www.allbest.ru/

Примечание: для вызова встроенной функции СУММПРОИЗВ необходимо выполнить последовательность действий:

установить курсор в нужную ячейку (в нашем примере - в ячейку Е4);

вызвать “Мастер функций” (кнопка f_x), далее “Математические” и выбрать “СУММПРОИЗВ”;

в появившейся экранной форме (см. рис. 3) установить курсор в “Массив 1” и выделить на листе EXCEL диапазон зарезервированных для значений переменных ячеек, поставив им абсолютные адреса ($C$3:$D$3) нажатием функциональной клавиши F4; перевести курсор в “Массив 2” и выделить диапазон ячеек, в которых записаны коэффициенты при переменных в целевой функции (C4:D4), после чего нажать “ОК”.

Размещено на http://www.allbest.ru/

Таким образом, после завершения всех подготовительных операций выбираем в “Сервис” процедуру “Поиск решения” (см. рис. 4). В появившейся экранной форме (см. рис 5) устанавливаем целевую ячейку - $Е$4, затем отмечаем флажком тип оптимизации (исходя из условий задачи) - максимизация; переводим курсор в “Изменяя ячейки” и выделяем на листе EXCEL диапазон зарезервированных для значений переменных ячеек ($C$3:$D$3); после чего, установив курсор в “Ограничения”, нажимаем “Добавить” и в появившейся экранной форме (см. рис. 6) отмечаем диапазон ячеек:

“Ссылка на ячейку” - $Е$6:$Е$9 (здесь записаны результаты суммирования левых частей неравенств в системе ограничений);

знак выбирается согласно построенной математической модели, причем, если не все ограничения имеют одинаковые знаки, то каждая группа таких ограничений программируется отдельно, для чего удобно ограничения с одинаковыми знаками располагать изначально рядом друг с другом;

“Ограничение:” - $G$6:$G$9 (здесь записаны правые части неравенств в системе ограничений модели).

Размещено на http://www.allbest.ru/

Размещено на http://www.allbest.ru/

По нажатию “ОК” возвращаемся к экранной форме “Поиск решения”. Выбираем пункт “Параметры”, где отмечаем флажком “Линейная модель” и ”Неотрицательные значения” (см. рис. 7), затем по нажатию “ОК” возвращаемся к экранной форме “Поиск решения”.

Размещено на http://www.allbest.ru/

Размещено на http://www.allbest.ru/

После выбора опции “Выполнить” EXCEL проводит расчеты и результаты вычислений заносятся в ячейки C3:D3 и Е4, которые были зарезервированы для значений искомых переменных и оптимального значения целевой функции.

Окончательно лист EXCEL будет иметь вид (см. рис. 8):

Размещено на http://www.allbest.ru/

Замечание. Если “Поиск решения” закончил работу конфликтно, то возможны следующие ситуации:

целевая функция не ограничена на множестве допустимых решений сверху (снизу) для задачи максимизации (минимизации); в этом случае ;

неправильно введены формулы в ячейки либо допущена ошибка при заполнении формы “Поиск решения”; в данной ситуации необходимо перепроверить правильность введенных формул и вновь запустить “Поиск решения”.

Кроме поиска оптимального решения можно также получить дополнительную информацию, например, значения двойственных переменных. Для этого необходимо выделить интересующий тип отчета (в данном случае - “Устойчивость”) и нажать “ОК” (см. рис 8). Выбрав затем лист EXCEL “Отчет по устойчивости 1” (см. рис 9), в таблице “Ограничения” в столбце “Теневая цена” и будут записаны значения двойственных переменных.

Размещено на http://www.allbest.ru/

Таким образом, в результате использования встроенного инструмента “Поиск решения” было найдено оптимальное решение исходной (а также и двойственной) задачи, а именно:

арифметический приближенный excel бесконечный

Итак, оптимальный план производства предусматривает выпуск ¹⁰/₃т. краски Е и ⁴/₃т. краски I, прибыль от реализации которой будет максимальной и составит тыс. грн.

Размещено на Allbest.ru