/
n-dimens
/
pascalabcnet
Обзор
Документация
Войти
/
n-dimens
/
pascalabcnet
Код
Запросы
0
Задачи
Вики
Пакеты
0
Релизы
0
Аналитика
Безопасность
master
InstallerSamples/!Tutorial/18_Dll/MyLib.pas
26 строк
457 B
Artem Pelenitsyn
change encoding for all *.pas and *.cs files: cp1251 -> utf-8
28 дек 2015, 14:25
28 дек 2015, 14:25
49378a6
Код
Авторство
О чём код?
// Откомпилируйте библиотеку, нажав Ctrl-F9. В папке должен появиться файл MyLib.dll library MyLib; const MyPi = 3.14; function add(a,b: integer): integer; begin Result := a + b; end; type Frac = record num,denom: integer; constructor (n,d: integer); begin num := n; denom := d; end; procedure Print; begin writeln(num,'/',denom); end; end; end.