Практическая работа №7. Воронежский государственный

ГОБУ СПО ВО

Воронежский государственный

промышленно-экономический колледж»

Отчет

О выполнении практических работ

по дисциплине «Базы данных»

Выполнил: студент 126 группы

Кулиничев В.А.

Проверил/а: Закревская Е.М.

Воронеж 2015

Практическая работа №6

Тема практической работы: Написание программы

Цель практической работы: Научится создавать, простейшие программы в Delphi используя компоненты: Label и кнопка Button на вкладке Standard.

Ход работы:

Задание: ……..

1.Создал новую форму и кнопку Button и вывод надписи Label

2. Код программы

unit Unit1;

interface

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

Dialogs, StdCtrls;

type

TForm1 = class(TForm)

Label1: TLabel;

Button1: TButton;

procedure Button1Click(Sender: TObject);

private

{ Private declarations }

public

{ Public declarations }

end;

var

Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);

begin

Label1.Caption: =''

end;

end.

Вывод: я научится создавать, простейшие программы в Delphi используя компоненты: Label и кнопка Button на вкладке Standard.

Практическая работа №7

Тема: «Работа с массивами»

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

Ход работы:

1.Как показано на скриншоте, программа представляет собой форму с размещенными на ней компонентами: label, edit, button, stringgrid. Надписи на компонентах label, edit и button меняются программно.

Вывод: Я написал программу, которая вычисляет массив, присваивая его к-му элементу значение элементу значение 1, если элементы k–й строки матрицы упорядочены по убыванию, и значение 0 в противном случае.