Линейный алгоритм

жүктеу/скачать 225,55 Kb.

бет	1/2
Дата	04.10.2022
өлшемі	225,55 Kb.
	#151549
түрі	Отчет

1 2

Байланысты:
отчет 2

Цель работы Приобретение умений программирования арифметических выражений по линейному алгоритму. Задание

Санкт-Петербургский политехнический университет Петра Великого
Институт машиностроения, материалов и транспорта
Высшая школа машиностроения

Отчет
по лабораторной работе №2

Дисциплина: «Цифровой практикум»
Тема: «Линейный алгоритм»
Студент гр. 3331501/10003 Вашков Е. С.
Преподаватель Кожанова Ю.В.

Санкт-Петербург

2021
Цель работы
Приобретение умений программирования арифметических выражений по линейному алгоритму.

Задание
Разработать проект для вычисления значения выражения z, где x и y– – переменные, a и b – константы. Представить результат в трёх форматах: обычном, экспоненциальном, с округлением до трёх знаков после запятой. Формула для вычисления z по моему варианту представлена на рисунке 1.

Рисунок 1 - Вариант 2

Ход работы
Блок-схема алгоритма вычисления значения выражения представлена на рисунке 2.

Начало

a=3,b=5
ввод x,y

Рисунок 2 – Блок схема

Код программы:
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, Math;
type
TForm1 = class(TForm)
Label1: TLabel;
Edit1: TEdit;
Label2: TLabel;
Edit2: TEdit;
Button1: TButton;
Label3: TLabel;
Label4: TLabel;
Label5: TLabel;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
const a=3; b=5;
var x,y,z1,z2,z3,z:real;
begin
x:=StrToFloat(Edit1.Text);
y:=StrToFloat(Edit2.Text);
z1:=(sqrt(sqr(x)+1)+x)/(sin(x)+cos(x));
z2:=(sqrt(sqr(y)+1)+y)/(sin(y)+cos(y));
z3:=(sqrt(sqr(y-b)+1)+y-b)/(sin(y-b)+cos(y-b));
z:=a*z1-2*a*z2+z3;
Label3.Caption:='z='+FloatToStr(z);
Label4.Caption:='z='+FloatToStrF(z,ffExponent,6,3);
Label5.Caption:='z='+FloatToStrF(z,ffFixed,6,3);
end;
end.

Пример работающего приложения с указанием компонентов формы представлен на рисунке 3.

Label1

Edit1

Label2

Edit2

Label3

Button1

Form1

Рисунок 3 - Пример работы программы

Проверка полученного значения выражения с помощью альтернативного расчета SMath Studio Cloud показана на рисунке 4.

Рисунок 4 - Альтернативный расчет SMath Studio Cloud

Вывод
Во время работы получены навыки программирования арифметических выражений по линейному алгоритму, изучены типы данных, константы и переменные.

жүктеу/скачать 225,55 Kb.

Достарыңызбен бөлісу:

1 2