Разработать пользовательскую программы по решению математических задач средствами языка программирования Delphi Курсовая работа (проект)

Введение

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

Тема данной курсовой работы «Разработать пользовательскую программы по решению математических задач средствами языка программирования Delphi».

В данной курсовой работе необходимо выполнить следующие задачи:

а) Вычислительные операции: Найти все натуральные трехзначные числа, каждое из которых обладает следующим свойством: первая цифра в три раза меньше последней его цифры.

б) Итерационные алгоритмы: Здесь n вложений модуля. Вычислить .

в) Массивы: Дана квадратная матрица. Определить сумму элементов матрицы, которые можно достичь ходом короля, находящемся на поле с заданными координатами.

г) Обработка строк: Дана символьная строка. Слово – последовательность символов между пробелами, не содержащая пробелы внутри себя. Отредактировать заданное предложение, удаляя из него слова, которые уже встречались в предложении. Результат вывести на экран и в текстовый файл.

д) Записи и файлы: Создать файл, содержащий сведения об учете в ГАИ. Каждая запись имеет поля: ФИО автолюбителя, марка автомобиля, год выпуска, цвет кузова, номер двигателя. На экран и в отдельный файл вывести список автолюбителей, проходящих техосмотр в текущем году, сгруппированный по маркам автомобилей. Учесть, что если текущий год четный, то техосмотр проходят автомобили с четными номерами, иначе –с нечетными.

1 Блок-схемы, псевдокоды алгоритмов и их описание

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

Задача 1. Найти все натуральные трехзначные числа, каждое из которых обладает следующим свойством: первая цифра в три раза меньше последней его цифры.

2 Описание форматов исходных данных и результатов

Рассмотрим форматы исходных и результирующих данных всех поставленных задач в данной курсовой работе.

Для первой задачи исходными данными являются все натуральные трехзначные числа, удовлетворяющие условие поставленной задачи.

Результирующими данными является все 3-значные числа, у которых первая цифра в три раза меньше третьей.

Для второй задачи исходными данными является значение числа N. Тип данной переменной – целочисленный.

Результирующими данными является найденное значение, вещественного типа.

Для третьей задачи исходными данными является размерность матрицы, а также значения элементов матрицы. Тип числа размерности – целочисленный, тип данной матрицы – целочисленный.

Результирующими данными сумма в соответствии с условием задачи.

Для четверной задачи исходными данными является строка. Тип данной переменной – строковый.

Результирующими данными является преобразованная в соответствии с заданием строка (строковая переменная).

Для пятой задачи исходными данными является запись, которая содержит следующие поля: ФИО автолюбителя (строковый тип), марка автомобиля (строковый тип), год выпуска (целый тип), цвет кузова(строковый тип), номер двигателя (целый тип).

Результирующими данными является список автомобилей, которые проходят техосмотр в этом году, отсортированный по марке автомобиля.

3 Распечатка программ

Текст программы, которая реализует задачу 1:

unit Unit1;

interface

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;

type

TForm1 = class(TForm)

Button1: TButton;

Memo1: TMemo;

procedure Button1Click(Sender: TObject);

private

{ Private declarations }

public

{ Public declarations }

end;

var

Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);

Var

n1,n2,n3:integer;

s:string[3];

Begin

For n1:=1 to 3 do

begin

n3:=n1*3;

for n2:=0 to 9 do

begin

s:=Char($30+n1)+Char($30+n2)+Char($30+n3);

//Вывод решения на экран

Memo1.Lines.Add(s)

end;

end;

end;

end.

4 Описание работы программы на контрольных примерах

Для проверки правильности программ выполним несколько контрольных примеров для каждой из поставленных задач.

В результате выполнения первой задачи получим следующие натуральные числа: 103, 113,123, 133, 143, 153, 163, 173, 183, 193,206, 216, 226, 236, 246, 256, 266, 276, 286, 296, 309, 319, 329, 339, 349, 359,369, 379, 389, 399.

Для второй задачи введем следующее значение переменной N=3. В результате получим следующее значение суммы ряда: -13,6090315233669.

Если введем значение переменной N= 5. В результате получим следующее значение суммы ряда: -0,0236241386368298.

Для третьей задачи введем размерность N=3 и элементы матрицы (рисунок 4.1) и координаты (1,1) – в результате получим следующую сумму: 11.

СКРИНШОТЫ ИЗ РАБОТЫ

Заключение

В результате выполнения данной курсовой работы были реализованы следующие задачи:

а) Вычислительные операции: Найти все натуральные трехзначные числа, каждое из которых обладает следующим свойством: первая цифра в три раза меньше последней его цифры.

б) Итерационные алгоритмы: Здесь n вложений модуля. Вычислить .

в) Массивы: Дана квадратная матрица. Определить сумму элементов матрицы, которые можно достичь ходом короля, находящемся на поле с заданными координатами.

г) Обработка строк: Дана символьная строка. Слово – последовательность символов между пробелами, не содержащая пробелы внутри себя. Отредактировать заданное предложение, удаляя из него слова, которые уже встречались в предложении. Результат вывести на экран и в текстовый файл.

д) Записи и файлы: Создать файл, содержащий сведения об учете в ГАИ. Каждая запись имеет поля: ФИО автолюбителя, марка автомобиля, год выпуска, цвет кузова, номер двигателя. На экран и в отдельный файл вывести список автолюбителей, проходящих техосмотр в текущем году, сгруппированный по маркам автомобилей. Учесть, что если текущий год четный, то техосмотр проходят автомобили с четными номерами, иначе – с нечетными.