Модули

@Sinthetic · Регистрация: 20.01.2010

Провести вычисления. Необходимые для вычислений функции (факториал, возведение в степень и т.д.) описать в модуле.

Вот есть пример кода из учебного пособия:
Описать модуль, содержащий функцию вычисления n!.

Pascal

unit MyUnit;
interface {раздел объявлений}
function f(n:Integer):Longint;
implementation {раздел реализации}
function f(n: Word): Longint;
var
   i: Integer; {параметр для организации цикла}
   Result: Longint; {вспомогательная переменная используемая как резуль-тат вычислений}
begin
   Result:=1; {0!=1}
   for i:= 1 to n do
   Result:=  Result*i;
   f:= Result; {формирование результата выполнения функции}
end;
begin {раздел инициализации}
…
end.{конец модуля}

Тут моя программа, условие прикреплено ниже картинкой.

Pascal

Unit MyUnit1;
interface function f(a,b,c:real):real;
implementation
function f(a,b,c:real):real;
begin
f:=(2*a-b-sin(c))/(5+abs(c));
end;
begin
end.

Подскажите пожалуйста что нужно сделать чтоб ее запустить, чтоб она работала, до меня так и не доходит.. Пишет ошибку при запуске Ctrl + F
Error: Cannot run a unit

@~~pavelr~~ · 01.07.2010, 19:35

модуль надо как-то к программе пристегнуть

@Puporev · 01.07.2010, 19:40

нажми Ctrl+F9 в окошке

Сообщение от Sinthetic

Cannot run a unit

жми ОК и все

@Sinthetic · 02.07.2010, 00:39 **[ТС]**

хм и что вот я нажимаю но ничего не происходит.. Нам сказали какой то файл нужно создавать

@Puporev · 02.07.2010, 08:31

Sinthetic, Все происходит, создается файл .tpu, собственно модуль.

Сообщение от Sinthetic

Тут моя программа, условие прикреплено ниже картинкой.

никакая это не программа, а еще одна пародия на модуль. Короче открывайте книжку или Гугль и читайте о создании модуля в Паскале, у вас полный отстой в мозгу.

@~~pavelr~~ Заблокирован
	01.07.2010, 19:35	2
	модуль надо как-то к программе пристегнуть 0

@Puporev Модератор 62859 / 46906 / 32327 Регистрация: 18.05.2008 Сообщений: 113,654
	01.07.2010, 19:40	3
	нажми Ctrl+F9 в окошке Сообщение от Sinthetic Cannot run a unit жми ОК и все 0

@Sinthetic 0 / 0 / 0 Регистрация: 20.01.2010 Сообщений: 31
	02.07.2010, 00:39 [ТС]	4
	хм и что вот я нажимаю но ничего не происходит.. Нам сказали какой то файл нужно создавать 0

@Puporev Модератор 62859 / 46906 / 32327 Регистрация: 18.05.2008 Сообщений: 113,654
	02.07.2010, 08:31	5
	Sinthetic, Все происходит, создается файл .tpu, собственно модуль. Сообщение от Sinthetic Тут моя программа, условие прикреплено ниже картинкой. никакая это не программа, а еще одна пародия на модуль. Короче открывайте книжку или Гугль и читайте о создании модуля в Паскале, у вас полный отстой в мозгу. 0

Опции темы