Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
 
Рейтинг 5.00/7: Рейтинг темы: голосов - 7, средняя оценка - 5.00
0 / 0 / 0
Регистрация: 05.04.2009
Сообщений: 3
1

Компилируются ли подключаемые модули?

05.04.2009, 12:56. Просмотров 1395. Ответов 1
Метки нет (Все метки)


Здравствуйте, у меня 2 вопроса:
1) подключаемые модули в паскале вообще компилируются?
2) как сделать так, чтоб при вводе с клавиатуры функции (например: x*x*x+3*x-1, функция может вводится произвольная), она подставила её в строчку:
function F(x:real):real;
begin
F:= x*x*x+3*x-1; {вот чтоб вот эту функцию она затерала, а вводимую сюда вставляла}
end;

Заранее благодарен!
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
05.04.2009, 12:56
Ответы с готовыми решениями:

Подключаемые модули
Подключаемые модули. 1. Основные положения Подключаемый модуль – файл, содержащий исходный...

Не компилируются модули из папки LibSOURCE
Не компилируются модули из папки LibSOURCE, скорее коплируются но после компиляции удаляются об...

Подключаемые модули
Помогите плиз начинающему, в общем нашел в инете инструкцию по настройки своей WiFi сетевой в...

Lazarus, GUI, подключаемые модули, область видимости
Вот, начится, гуишный проект в лазарусе. Есть главный модуль, program.lpr. Есть модули с формами...

1
Отдыхающий:)
94 / 91 / 22
Регистрация: 05.04.2009
Сообщений: 188
05.04.2009, 13:54 2
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

1. Чтобы скомпилить модуль надо:
1.Поставить параметр Compile\destination disk
2.Убедиться что выбрана правильная директория хранения модулей(options\directories)
3.right alt+F9

Добавлено через 6 минут 38 секунд
2. Используем строки:
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
function kolch(s:string):byte;
begin j:=0;
for l:=1 to length(s) do begin
if ((zstr(s[l+1])=false)or(l+1>length(s)))and(zstr(s[l])) then inc(j);end;kolch:=j;end;
procedure chstr(s:string;x:byte; var p:real;var b,c:byte);
begin s1:='';j:=0;z:=0;f1:=0;g1:=0;a1:=0;
for l:=1 to length(s) do begin
if (zstr(s[l]))and((zstr(s[l-1])=false)or(l-1=0)) then f1:=l;
if (zstr(s[l])) then s1:=s1+s[l];
if ((zstr(s[l+1])=false)or(l=length(s)))and(zstr(s[l])) then
begin inc(j);val(s1,a2,fb);s1:='';g1:=l;end;
if j=x then begin p:=a2;b:=f1;c:=g1;a2:=0;fb:=0;break;end;end;end;
procedure mozg(s:string; var v:boolean);
begin
v:=false;
chstr(s,1,w,o1,g1);o1:=0;
for i:=2 to kolch(s) do begin
chstr(s,i,e,f1,p1);
if (s[f1-1]in fi)and(zstr(s[f1-2])) then begin v:=true;
case s[f1-1] of
'+':w:=w+e;
'-':w:=w-e;
'*':w:=w*e;
'/':begin w:=w/e;o1:=2;end;end;end;end;if v then writeln(w:0:o1);
end;
mozg из текста берёт примеры и выводит их как строку
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
05.04.2009, 13:54

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь или здесь.

Не компилируются команды PSRLDQ, MOVDQA, хотя другие команды MMX с указанием регистров XMM компилируются
Добрый день! Возникла необходимость работать с регистрами XMM. Оказалось, что команды PSRLDQ,...

подключаемые файлы
Я использую много файлов (.h) в программе... В уже готовом exe файле они будут включены??? или мне...

Подключаемые файлы
Пишу модуль с админкой, в которой будет настройка модуля. Главная страница содержит все функции,...

Подключаемые библиотеки
Приветствую всех. Друзья возникла у меня некая идея за которой последовало ряд вопросов все...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.