37869

Простейшие средства отладки в среде DELPHI. Программирование циклических алгоритмов

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

Информатика, кибернетика и программирование

Вывод: изучил простейшие средства отладки в среде DELPHI. Научился программировать циклические алгоритмы.

Русский

2015-01-26

124.5 KB

11 чел.

Министерство образования Республики Беларусь

УО “Барановичский государственный университет”

Инженерный факультет

Кафедра информационных систем и технологий

Введение в специальность

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

Вариант №6

группа ИСТ-12

Ф.И.О. студента Сергеев А. С.

Ф.И.О. преподавателя Капуста В. И.

Подпись преподавателя _______________

Барановичи, 2013

Программирование циклических алгоритмов

Задание для самостоятельного выполнения

В заданиях необходимо вывести на экран таблицу значений функции Y(x) и ее разложения в ряд S(x) для x изменяющихся от xn до xk с шагом h=(xk-xn)/n. Близость значений S(x) и Y(x) во всем диапазоне значений x указывает на правильность вычисления S(x) и Y(x).

хn

хk

S(x)

n

Y(x)

6

0.1

1

8

Код программы:

unit Unit1;

interface

uses

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

 Dialogs, StdCtrls, XPMan;

type

 TForm1 = class(TForm)

   Label1: TLabel;

   Label2: TLabel;

   Label3: TLabel;

   Label4: TLabel;

   shag: TMemo;

   Button1: TButton;

   Edit1: TEdit;

   Edit2: TEdit;

   Edit3: TEdit;

   Button2: TButton;

   Memo1: TMemo;

   Memo2: TMemo;

   Label5: TLabel;

   Label6: TLabel;

   xpmnfst1: TXPManifest;

   procedure FormCreate(Sender: TObject);

   procedure Button1Click(Sender: TObject);

   procedure Button2Click(Sender: TObject);

 private

   { Private declarations }

 public

   { Public declarations }

 end;

var

 Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);

begin

shag.Clear;

Memo1.Clear;

Memo2.Clear;

Edit1.Text:='0,1';

Edit2.Text:='1';

Edit3.Text:='8';

end;

procedure TForm1.Button1Click(Sender: TObject);

begin

Application.Terminate

end;

procedure TForm1.Button2Click(Sender: TObject);

var x1,x2,x,h,s,y,q,a:extended;i,k,n,p:integer;

begin

memo1.Clear;

memo2.Clear;

x1:=StrToFloat(Edit1.Text);

x2:=StrToFloat(Edit2.Text);

n:=StrToInt(Edit3.Text);

h:=(x2-x1)/n;

shag.Lines.Add(FloatToStrf(h,ffGeneral,5,3));

s:=0;x:=x1;

for k:=1 to n do begin

s:=x;

for p:=1 to n do begin

q:=1;

for i:=1 to (2*p+1) do begin

q:=q*i;{факториал}

end;

a:=exp(ln(x)*(1+2*p))/q;

s:=s+a;

end;

x:=x+h;

memo1.Lines.add('s='+FloatToStrf(s,ffFixed,8,6));

end;

x:=x1;

for k:=1 to n do begin

y:=(exp(x)-exp(-x))/2;

x:=x+h;

memo2.Lines.add('y='+FloatToStrf(y,ffFixed,8,6));

end;

end;

end.

Использованные в программе объекты:

Окончательная форма:

Работа программы при запуске:

Завершение программы происходит при нажатии на кнопку “Выйти ”

Программа завершается.

Вывод: изучил простейшие средства отладки в среде DELPHI. Научился программировать циклические алгоритмы.


 

А также другие работы, которые могут Вас заинтересовать

80710. Учетная политика предприятия 125 KB
  Под учетной политикой организации понимается принятая ею совокупность способов ведения бухгалтерского учета первичного наблюдения стоимостного измерения текущей группировки и итогового обобщения фактов хозяйственной деятельности. К способам ведения бухгалтерского учета относятся способы группировки и оценки фактов хозяйственной деятельности погашения стоимости активов организация документооборота инвентаризации способы применения счетов бухгалтерского учета системы учетных регистров обработки информации и иные соответствующие...
80711. Малые предприятия: бухгалтерский учет и особенности налогообложения 122.5 KB
  Малые предприятия: бухгалтерский учет и особенности налогообложения Основные понятия о малом предпринимательстве Условия и показатели для применения упрощенной системы налогообложения Условия для применения простой формы бухгалтерского учета Ведение учета частными предпринимателями Изменения в налогообложении в связи с введением единого налога на вмененный доход Основные понятия о малом предпринимательстве...
80712. Бухгалтерский учет и его основные задачи 69.5 KB
  Основной целью хозяйственного учета является формирование качественной и своевременной информации о финансовой и хозяйственной деятельности предприятия, необходимой для управления рыночной экономикой, для подготовки, обоснования и принятия управляющих решений на различных уровнях, для определения поведения на рынке, определения своего места среди конкурентов и т.п.
80713. Бухгалтерский баланс 75.5 KB
  Понятие и виды бухгалтерского баланса Строение бухгалтерского баланса. Понятие и виды бухгалтерского баланса. Учетное понятие баланса это момент счетного отражения имущественного состояния хозяйства. Составлением вступительного организационного баланса открывается ведение бухгалтерского учета на данном предприятии.
80714. Система счетов и двойная запись 64 KB
  Понятие о счетах БУ и двойной записи. Понятие о счетах бухгалтерского учета и двойной записи Для текущего учета и контроля используется система счетов БУ. Счет это также накопитель информации который затем обобщается и используется для составления различных сводных показателей и отчетности СЧЕТ Д К Для обозначения остатков на счетах БУ пользуются термином сальдо Для отражения хозяйственных операций на счетах необходимо документальное подтверждение в качестве которого могут быть бумажные первичные документы магнитные носители и т. В...
80715. Первичный учет 68 KB
  Эти документы служат первичными учетными документами на основании которых ведется бухгалтерский учет. Первичные учетные документы принимаются к учету если они составлены по форме содержащейся в альбомах унифицированных форм первичной учетной документации а документы форма которых не предусмотрена в этих альбомах должна содержать следующие обязательные реквизиты: наименование документа; б дату составления документа; в наименование организации от имени которой составлен документ; г содержание хозяйственной операции; д измерители...
80716. Учетные регистры бухгалтерского учета 58 KB
  Учетные регистры бухгалтерского учета. Журнально ордерная форма бухгалтерского учета. Журнально ордерная форма учета обладает большими контрольными и аналитическими возможностями и применяется на больших предприятиях.
80717. Наречие и его категории 34.28 KB
  Ранние грамматисты относили наречие к нерасчлененному разряду частиц. Суит Есперсен Датский лингвист Отто Есперсен относил наречие к частицам указывая на то что такие слова как например up immeditely принадлежат к одной группе так как они не принадлежат ни к существительным ни к глаголам ни к прилагательным ни к глаголам ни к местоимениям. С одной стороны наречие занимает самостоятельную позицию члена словосочетания с другой стороны рассматривается наряду с классами неспособными быть самостоятельными членами словосочетания.
80718. Модальные слова 35.26 KB
  Модальные слова морфологически неизменяемые слова выражающие характер соотнесенности содержания высказывания или части с реальной действительностью с позицией говорящего и употребляющиеся либо в структуре предложения в функции вводного слова либо за пределами этой структуры как слова предложения связанные по смыслу с предшествующими или с последующими высказываниями иногда и с теми и с другими вместе. Модальные слова принадлежат к лексико грамматическим средствам выражения категории модальности. Одни исследователи в основном...