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

[Lis]

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

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

Код

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.{конец модуля}

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

Код

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 + F9
Error: Cannot run a unit
нажимаю Ок и ничего не происходит.

Сообщение отредактировано: Lis - 2.07.2010 0:27

[Lis]

Далее сохраняешь файл и жмёшь Compile->Build (не забудь в опциях проверить, что установлено Destination Disk). На выходе получишь TPU-файл модуля.

В опциях поставил Destination Disk, затем нажал Compile->Build, а он мне ошибку (там даже путь то не мой какой то)

Вобщем у меня все через ж*пу... если закрыть паскаль, и двойным щелчком запустить файл math.pas (при условии что его открывать с помощью TPC.EXE ), то создается TPU, далее я делаю второй файл, сохраняю его, закрываю паскаль, так же двойным щелчком его запускаю, создается файл с расширением *.exe
его запускаю и там вроде как выводится нужный результат "120".. Спасибо!

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

Сообщение отредактировано: Lis - 2.07.2010 10:49

[Lapp]

а он мне ошибку (там даже путь то не мой какой то)

Если хочешь получить помощь, пиши, какая ошибка, точно. Расплывчатые "там даже путь не мой" прибереги для телепатов.

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

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

Добавлено через 2 мин.
Да, и еще: используй правильные тэги (правила раздела, п.2)