Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:

инфа л.р 4 / отчет по л.р 4 готовый!!!!!!!!!!!!

.doc
Скачиваний:
25
Добавлен:
15.04.2015
Размер:
267.26 Кб
Скачать

МИНИСТЕРСТВО ОБРАЗОВАНИЯ РЕСПУБЛИКИ БЕЛАРУСЬ

УЧРЕЖДЕНИЕ ОБРАЗОВАНИЯ

«ГОМЕЛЬСКИЙ ГОСУДАРСТВЕННЫЙ ТЕХНИЧЕСКИЙ

УНИВЕРСИТЕТ ИМЕНИ П. О. СУХОГО»

Механико-технологический факультет

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

ОТЧЕТ ПО ЛАБОРАТОРНОЙ РАБОТЕ № 4

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

на тему:

«Программирование линейных алгоритмов»

Выполнил: студент гр. С-11

С.В. Козырь

Принял: преподаватель

В.О. Лукьяненко

Дата сдачи отчета: _____________________

Дата допуска к защите: _____________________

Дата защиты: _____________________

Гомель 2012

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

  1. Задание №1

Разработать интерфейс проекта, составить графическую схему алгоритма и программу для вычисления значений переменных в соответствии с условием в таблице 1. Для ввода исходных данных, вывода исходных данных и результатов использовать только одну форму. Исходные данные для отладки программы выбрать самостоятельно.

Вариант 10

Вычислить

Расчетные формулы

Объем V и площадь поверхности куба S со стороной а

V=a3, S=6a2

Форма программы

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

Элемент интерфейса

Визуальный компонент

Свойство компонента

Значение свойства

Заголовок окна

Form1

Caption

Объем V и площадь поверхности куба S

Введите значение (a):

Label1

Caption

Введите сторону куба

Поле ввода a

Edit1

Text

Кнопка Вычислить

Button1

Caption

Вычислить

V куба

Label2

Caption

V куба =

S куба равна

Label3

Caption

S куба =

Продолжение таблицы используемых компонентов и их свойств

Поле вычисления V

Edit2

Text

Поле вычисления S

Edit3

Text

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

Визуальный компонент

Событие

Имя процедуры обработки событий

Реализуемый алгоритм

Button1

onClick

TForm1.Button1.Click

Расчет объема (V) и площадь поверхности куба (S) со стороной а

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

Имя переменной задачи

Имя переменной в программе

Тип переменной

Название

а

а

real

Сторона поверхности куба

S

S

real

Площадь Куба

V

V

real

Объем Куба

Схема алгоритма

Текст модуля

unit Unit1;

interface

uses

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

Dialogs, StdCtrls;

type

TForm1 = class(TForm)

Button1: TButton;

Label1: TLabel;

Edit2: TEdit;

Edit3: TEdit;

Label2: TLabel;

Label3: TLabel;

Edit1: TEdit;

procedure Button1Click(Sender: TObject);

private

{ Private declarations }

public

{ Public declarations }

end;

var

Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);

var

a,V,S: real;

begin

a:=StrToFloat(Edit1.Text);

V:=a*a*a;

S:=6*(a*a);

Edit2.Text:=FloatToStr(V);

Edit3.Text:=FloatToStr(S);

end;

end.

Тесты

  1. если a=4, тогда V= 64 , S=96

  2. если a=6, тогда V=216, S=216

  3. если a=9, тогда V=729, S=486

Задание 2. Разработать интерфейс проекта, составить графическую схему алгоритма и программу для вычисления функции b=f(x,y,z), заданной в таблице 2. Для ввода исходных данных, вывода исходных данных и результата использовать только одну форму. Исходные данные для отладки программы выбрать самостоятельно.

Вариант 10

Вариант

Вид функции

10

Форма программы

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

Элемент интерфейса

Визуальный компонент

Свойство компонента

Значение свойства

Заголовок окна

Form1

Caption

Введите число x

Label1

Caption

Введите x

Поле ввода числа x

Edit1

Text

Введите число y

Label2

Caption

Введите y

Поле ввода y

Edit2

Text

Введите число z

Label3

Caption

Введите z

Поле ввода числа z

Edit3

Text

Кнопка Значение функции

Button1

Caption

Значение функции

Значение функции b=

Label4

Caption

b =

Поле вычисления b

Edit4

Text

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

Визуальный компонент

Событие

Имя процедуры обработки событий

Реализуемый алгоритм

Button1

onClick

TForm1.Button1.Click

Расчет значения функции

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

Имя переменной задачи

Имя переменной в программе

Тип переменной

Название

x

x

real

Значение х

y

y

real

Значение y

z

z

real

Значение z

b

b

real

Значение функции b

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

Текст модуля

unit Unit1;

interface

uses

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

Dialogs, StdCtrls;

type

TForm1 = class(TForm)

Label1: TLabel;

Edit1: TEdit;

Button1: TButton;

Label2: TLabel;

Edit2: TEdit;

Label3: TLabel;

Edit3: TEdit;

Edit4: TEdit;

Label4: TLabel;

procedure Button1Click(Sender: TObject);

private

{ Private declarations }

public

{ Public declarations }

end;

var

Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);

var

x,y,z,b:real;

begin

x:=StrToFloat(Edit1.Text);

y:=StrToFloat(Edit2.Text);

z:=StrToFloat(Edit3.Text);

b:=exp(abs(x-y))*exp(x*ln(sqr(sin(z)/cos(z))+1));

Edit4.Text:=floatTOStr(b);

end;

end.

Тесты

  1. если x=2, y=3, z=2, тогда b= 90,64

  2. если х=1, y=1, z =2, тогда b= 5,77

ВЫВОД: Я получил навыки составления схем линейных алгоритмов, научился составлять программы по разработанным алгоритмам и готовить тесты для отладки этих программ.

Соседние файлы в папке инфа л.р 4