Cout << "Сейчас будет звонить!" << endl; asm

{
MOV AH,2
MOV DL,7
INT 21H
}

cout << "Есть!" << endl;
}

Используя оператор asm, программа комбинирует C++ и операторы языка ассемблера.

С и Pascal:

Пусть программа на Pascalcipas должна обратиться к подпрограмме fun на С. Ей передаются значения двух переменных i и j целого типа. Функция fun должна возвратить целое значение, равное i-j, которое в программе на Pascal выводится на экран.

Текст программы на Pascal:

program cipas;

{$L c:prim.obj} {подключение файла c:prim.obj с функцией fun}

var i,j:integer; {объявление перменных i и j целого типа}

function fun(i,j:integer): integer; external;