модуль для работы с динамическими типами данных

← →
resuS (2006-06-20 18:04) [0]

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

← →
Ega23 © (2006-06-20 18:13) [1]

Что такое "динамический тип данных"????

← →
Desdechado © (2006-06-20 18:13) [2]

слишком невнятная формулировка

← →
resuS (2006-06-20 18:34) [3]

И я не знаю:)

Вот была задача:

"Нап. прог. вычисляющюю значение выражения без переменных, в постфиксной форме (+-*/ целые числа).
Например
10 15 + 18 - 2 * = выражение просматривается слева направо, если встречается число, то его значение(как целое) заносится в стек, а если встречается знак операции, то из стека извлекаются два последних элемента(это операнды данной опрации), над ними выполняется операция, и результат записывается в стек. В конце в стеке остается только одно число, значение этого выражения.
"
слдеующая задача звучала та, которая в заголовке. И что мне делать?

← →
Ega23 © (2006-06-20 18:37) [4]

> И что мне делать?

Найти дорожку для разбега и стену?

А если серьёзно: чего ты хочешь?

← →
resuS (2006-06-20 18:40) [5]

Хочу выполнить эти задания. но не знаю, что такое динамический тип данных, как сделать с модуль.

Цитирую:
Задание №3:
Для программы из предыдущего задания создать модуль, выделив в него
подпрограммы работы с динамическими типами данных.

И как я что-то выделю, если я не знаю, что выделять?

← →
Desdechado © (2006-06-20 18:42) [6]

может, вынести работу с типом "стек" в тот модуль?

← →
resuS (2006-06-20 18:44) [7]

Скорее всего. Но как сделать модуль данных? Как с ним работать? Как потом его использовать? И вообще, что это такое?

← →
Desdechado © (2006-06-20 18:45) [8]

модуль для работы с данными и модуль данных - не одно и то же
просто создаешь еще один Unit2.pas, в который выносишь функции работы со своими TStack

← →
resuS (2006-06-20 18:50) [9]

Сообщю, пишу я эту прогу на Паскале.
И как потом эту функцию подключить к головной программе?

← →
resuS (2006-06-20 18:52) [10]

этот модуль, точнее.
И еще, какая разница в "модуль для работы с данными и модуль данных"?

← →
Alien1769 © (2006-06-20 18:53) [11]

> И как потом эту функцию подключить к головной программе?

Подключить нужно унит2. А с этого модуля брать свои функции.
типа так :
use unit2;

← →
resuS (2006-06-20 18:55) [12]

В Паскале?
И как потом брать? пример...

← →
Alien1769 © (2006-06-20 19:00) [13]

> use unit2;

Звиняйте опечатка, нужно
uses unit2;

> В Паскале?

А в Паскале есть также
interface
.....
implementation

← →
resuS (2006-06-20 19:20) [14]

Ааа? И что? Как этими
interface
.....
implementation
пользоваться?

to resuS

The implementation part of the unit is where you find the bodies of the
procedures and functions that are declared in the interface part of the
unit.

The implementation part of the unit is the private part. Declarations made
here can be used only within this section of the unit.

All constants, types, variables, procedures, and functions in the interface
portion are visible in the implementation.

The implementation can have additional declarations of its own that are not
visible to any programs using the unit.

A uses clause can appear in the implementation, immediately following the
reserved word implementation.

If any procedures have been declared external, one or more $L filename
directive(s) should appear anywhere in the source file before the final end
of the unit.

The normal (not inline) procedures and functions declared in the interface
must reappear in the implementation.

The procedure/function header in the implementation should be either:
- identical to the declaration in the interface, or
- in the short form

← →
resuS (2006-06-20 19:33) [16]

спасибо - это я читал
Ты бы лучше мне примерчик кода дал, как оформлять модуль(к примеру, который имеет только одну функцию, которая складывает два числа)

← →
resuS (2006-06-20 19:37) [17]

Благодарю Google :)
Вот нашел ответ на свой вопрос.
Unit MyUnit; interface function MyFunction(x: Real): Integer; procedure MyProcedure (x: Real; var k: Integer); implementation function MyFunction(x: Real): Integer; begin MyFunction := Round(x*x); end; procedure MyProcedure (x: Real; var k: Integer); begin k := Trunc(x*x); end; end.

{$O+,F+}
unit unit2;

interface

procedure Sum(a,b:Integer;var result:integer);

implementation

procedure Sum(a,b:Integer;var result:integer);
begin
result:=a+b;
end;

end.

← →
resuS (2006-06-20 19:40) [19]

Спасибо всем, кто откликнулся.

модуль для работы с динамическими типами данных Найти похожие ветки