0 / 0 / 0
Регистрация: 05.04.2009
Сообщений: 3

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

05.04.2009, 12:56. Показов 1910. Ответов 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)
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
05.04.2009, 12:56
Ответы с готовыми решениями:

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

Не компилируются модули из папки LibSOURCE
Не компилируются модули из папки LibSOURCE, скорее коплируются но после компиляции удаляются об этом говорит отладочная информация .xml (я...

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

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

Решение

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
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
05.04.2009, 13:54
Помогаю со студенческими работами здесь

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

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

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

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

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


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

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

Новые блоги и статьи
Использование SDL3-callbacks вместо функции main() на Android, Desktop и WebAssembly
8Observer8 24.01.2026
Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а привычная функция main(). . .
моя боль
iceja 24.01.2026
Выложила интерполяцию кубическими сплайнами www. iceja. net REST сервисы временно не работают, только через Web. Написала за 56 рабочих часов этот сайт с нуля. При помощи perplexity. ai PRO , при. . .
Модель сукцессии микоризы
anaschu 24.01.2026
Решили писать научную статью с неким РОманом
http://iceja.net/ математические сервисы
iceja 20.01.2026
Обновила свой сайт http:/ / iceja. net/ , приделала Fast Fourier Transform экстраполяцию сигналов. Однако предсказывает далеко не каждый сигнал (см ограничения http:/ / iceja. net/ fourier/ docs ). Также. . .
http://iceja.net/ сервер решения полиномов
iceja 18.01.2026
Выкатила http:/ / iceja. net/ сервер решения полиномов (находит действительные корни полиномов методом Штурма). На сайте документация по API, но скажу прямо VPS слабенький и 200 000 полиномов. . .
Расчёт переходных процессов в цепи постоянного тока
igorrr37 16.01.2026
/ * Дана цепь(не выше 3-го порядка) постоянного тока с элементами R, L, C, k(ключ), U, E, J. Программа находит переходные токи и напряжения на элементах схемы классическим методом(1 и 2 з-ны. . .
Восстановить юзерскрипты Greasemonkey из бэкапа браузера
damix 15.01.2026
Если восстановить из бэкапа профиль Firefox после переустановки винды, то список юзерскриптов в Greasemonkey будет пустым. Но восстановить их можно так. Для этого понадобится консольная утилита. . .
Сукцессия микоризы: основная теория в виде двух уравнений.
anaschu 11.01.2026
https:/ / rutube. ru/ video/ 7a537f578d808e67a3c6fd818a44a5c4/
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru