Пример сборки разнородных модулей в системе АПРОП

РефератПомощь в написанииУзнать стоимостьмоей работы

Edi t2 .Text := IniToStrf fact); end; end. Variants, Classes. Graphics, Controls. Программа P2 на Delphi. For i:=l toStrTolnt (Editl.Text)do. Program Project 1; uses Forms,. Private {Private declarations! Windows. Messages. SysUtils. Labell: TLabcl; Editl: TEdit; Unit Unitl; interface uses. Type TForml class (TForm). Implementation {SR *.dfm}. Программа Unitl. Forms. Dialogs. StdCtrls; Var fact… Читать ещё >

Пример сборки разнородных модулей в системе АПРОП (реферат, курсовая, диплом, контрольная)

Основной механизм системы АПРОП — библиотека интерфейса была пополнена новыми функциями преобразования типов данных для двух ЯП — Дельфи и Паскаль. В [7] приведено описание типов данных этих ЯП и реализация имеющихся различий. Согласно данной концепции преобразование различающихся типов данных в языках Delphi и Pascal провели студенты 4 курса (С. Балаклеенко и Л. Зинченко) кафедры информационных технологий Киевского национального университета им. Тараса Шевченко на примере программы факториал числа в табл. 2.1.

Таблица 2.1. Схема сборки программ Р1 и Р2.

Профамма Р1 в языке Pascal.

Программа Unitl.

Программа P2 на Delphi.

program prl; uses Crt;

var fact. i. N: longint;

begin.

clrscr.

writeln ('Vvedit N:"); read In (N); fact:-l;

for i~ 1 toN do begin.

fact:=fact*i;

end;

writeln ('Factorial 4isla N, ' -fact); read In; end.

unit Unitl; interface uses.

Windows. Messages. SysUtils.

Variants, Classes. Graphics, Controls.

Forms. Dialogs. StdCtrls;

Type TForml class (TForm).

Labell:TLabcl; Editl: TEdit;

Label2: TLabel:

Edit2: TEdit;

Button 1: Tbutton.

procedure Button ICIick (Scndcr: TObjoct);

private {Private declarations!

public {Public declaration [ var Form 1: TForm 1;

implementation {SR *.dfm}.

procedure TForml. ButtonIClick (Sender: TObject);

var i, fact: Integer;

begin.

fact:=l;

for i:=l toStrTolnt (Editl.Text)do.

begin fact:=fact*i;

end;

Edi t2 .Text := IniToStrf fact); end; end.

program Project 1; uses Forms,.

Unitl in’Unitl.pas'.

{Forml};

{SR *.rcs} begin.

Application. Initialize; Application. CreateForm (TFonn 1, Fotm I); Application. Run; end.

На этой программе показана схема сборки модулей Р1 и Р2 с использованием библиотечных функций преобразования в программе факториал числа, алгоритм которой описан в модуле Р1 в языке Delphi и в модуле Р2 — в языке Pascal и модуль-посредник Until для преобразования неэквивалентных типов данных этих двух языков взаимосвязи.

Модуль-посредник (Until) содержит сгенерированные операторы обращения к программе в языке Pascal из библиотеки функций преобразования Р1 через Until После выполнения модуля Р2 в языке Delphi через модуль посредник Until, который проводит обратные преобразования данных, полученных результатов после возврата из модуля Р1.

Показать весь текст

Заполнить форму текущей работой

Другие работы

Определите суть информационных технологий

Информациомнные техноломгии (ИТ, от англ. information technology, IT) — широкий класс дисциплин и областей деятельности, относящихся к технологиям создания, сохранения, управления и обработки данных, в том числе с применением вычислительной техники. Под информационными технологиями в широком смысле понимается совокупность средств и методов сбора, обработки и передачи данных (первичной информации…

Реферат