Автор работы: Пользователь скрыл имя, 08 Мая 2010 в 17:44, Не определен
Пояснительная записка к курсовому проекту по дисциплине: "Информатика и программирование"
Введение. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 4
Часть 1. Программа на языке Turbo Pascal. . . . . . . . . . . . . . . . . . 5
Часть 2. Рабочая книга Excel. . . . . . . . . . . . . . . . . . . . . . . . . . . . 6
2.1 Лист презентации. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 6
2.2 Лист меню. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 6
2.3 Решение нелинейного уравнения. . . . . . . . . . . . . . . . . . . 7
2.4 Решение системы линейных уравнений. . . . . . . . . . . . . . . .8
2.4.1 Решение системы в Excel . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . ...8
2.4.2 Решение системы в MathCAD . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . ..9
2.5 Решение задачи оптимизации. . .. . . . . . . . . . . . . . . . . . . . 10
2.6 Решение экономической задачи . . . . . . . . . . . . . . . . . . . . 11
Заключение. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 12
Список используемой литературы. . . . . . .. . . . . . . . . . . . . . . . . 13
Приложение 1. . . . . . . . .. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 14
Приложение 2. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 16
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.3. Лист презентации.
Рисунок
2.3. Лист меню.
Рисунок
2.4. Лист решения задачи оптимизации.
Рисунок
2.5. Лист решения нелинейного уравнения.
Рисунок 2.6. Лист решения системы линейных
уравнений.
Рисунок
2.7.Лист решения системы линейных уравнений
в MathCad.
Рисунок 2.8.Лист решения экономической задачи