Программирование линейных алгоритмов на языке Delphi

 

Учреждение образования

Гомельский государственный технический университет имени П.О. Сухого

Кафедра «Информатика»











Лабораторная работа № 4

по курсу: Информатика

Программирование линейных алгоритмов на языке Delphi.



Выполнила студентка Мельникова Ирина

Принял преподаватель: Емельяненко Н.С


Цель работы: Получить навыки разработки линейных алгоритмов и их реализации в среде Delphi. Научиться составлять тесты для проверки программы

Условие задачи 1: Путь, пройденный за время t со скоростью v. S = vt


Таблица свойств компонентов

Элемент интерфейсаКомпонентСвойствоЗначение свойстваЗаголовок окнаForm1CaptionВычисление путиСкоростьLabel1CaptionСкоростьВремяLabel2CaptionВремяПоле ввода vEdit1TextПоле ввода tEdit2TextКнопка вычислитьButton1CaptionВычислитьПутьLabel3CaptionS=Поле вывода путиEdit3Text

Таблица используемых событий

КомпонентСобытиеИмя процедуры обработки событияРеализуемый алгоритмButton1OnClickTform1.Button1ClickРасчет пути

Таблица используемых переменных

Имя переменной в задачеИмя переменной в программеТип переменнойКомментарийv,tt,vExtendedСкорость и время-sExtendedПуть, результат

Тест


Исходные данные: v=3 t=5

Ожидаемый результат : s=v*t= 3*5=15

линейный алгоритм интерфейс графический

Графическая схема алгоритма


Распечатка результатов (окно формы в режиме выполнения)


Распечатка текста модуля


unit Unit1;, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,, StdCtrls;= class(TForm): TLabel;: TLabel;: TLabel;: TEdit;: TEdit;: TEdit;: TButton;Button1Click(Sender: TObject);

{ Private declarations }

{ Public declarations };: TForm1;

{$R *.dfm}TForm1.Button1Click(Sender: TObject);S,t,v: Extended;:=StrToFloat(Edit1.Text);:=StrToFloat(Edit2.Text);:=v*t;.Text:=FloatToStr(S);

end;.

Условие задачи 2: .



Таблица свойств компонентов

Элемент интерфейсаКомпонентСвойствоЗначение свойстваЗаголовок окнаForm1CaptionВычисление функцииxLabel1CaptionxyLabel2CaptionyzLabel3CaptionzПоле ввода xEdit1TextПоле ввода yEdit2TextПоле ввода zEdit3TextКнопка вычислитьButton1CaptionВычислитьbLabel4Captionb=Поле вывода bEdit4TextРисунокTImageTJPEGImageТаблица используемых событий

КомпонентСобытиеИмя процедуры обработки событияРеализуемый алгоритмButton1OnClickTform1.Button1ClickРасчет b

Таблица используемых переменных

Имя переменной в задачеИмя переменной в программеТип переменнойКомментарийx,y,zx,y,zrealx,y,z-brealb, результат

Тест


Исходные данные: x=4 y=5 z=2

Ожидаемый результат : = -1,62653326565218


Графическая схема алгоритма


Распечатка текста модуля:

Unit1;

interface, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,, StdCtrls, jpeg, ExtCtrls;= class(TForm): TLabel;: TLabel;: TLabel;: TEdit;: TEdit;: TEdit;: TLabel;: TEdit;: TButton;: TImage;Button1Click(Sender: TObject);

{ Private declarations }

{ Public declarations };: TForm1;

{$R *.dfm}TForm1.Button1Click(Sender: TObject);x,y,z,b:real;:=StrToFloat(Edit1.Text);:=StrToFloat(Edit2.Text);:=StrToFloat(Edit3.Text);:=sqr(cos(z))+(sin(2*x)/cos(2*x))+abs(y);.Text:=FloatToStr(b);;

end.


Вывод


Я получила навыки разработки линейных алгоритмов и их реализации в среде Delphi и научилась составлять тесты для проверки программы.


Учреждение образования Гомельский государственный технический университет имени П.О. Сухого Кафедра «Информатика»

Больше работ по теме:

Предмет: Информационное обеспечение, программирование

Тип работы: Практическое задание

Новости образования

КОНТАКТНЫЙ EMAIL: MAIL@SKACHAT-REFERATY.RU

Скачать реферат © 2018 | Пользовательское соглашение

Скачать      Реферат

ПРОФЕССИОНАЛЬНАЯ ПОМОЩЬ СТУДЕНТАМ