result - это дельфийная штучка. В ПАскале результат надо присваивать "псевдо-переменной" с именем самой функции:Лелик писал(а):function Sum(x,y:integer):integer;
begin
result:=x+y;
// тут пардон не помню точно или result или return
end;
Код: Выделить всё
function Sum(x,y:integer):integer;
begin
Sum:=x+y;
end;В общем, процедура и функция - вещи почти одинаковые, только у функции есть результатирующее значение. Вот простенькие примеры использования.PoTaP писал(а):обьясните процедуры и функции в паскале, желательно на простеньких примерах.
Код: Выделить всё
var a,b: integer]
2)[I]C функцией:[/I]
[code]
var a,b: integer;
{после объявления переменных объявим функцию}
function sum(var x,y: integer)[b]:integer;[/B]
{выделенный жирным шрифтом код означает,}
{что результат будет типом integer (целым числом)}
sum:=x+y;
end;
{начало программы}
begin
write('Введите 2 числа: ');
readln(a,b);
writeln('Cумма этих чисел = ',sum(a,b)); {здесь мы использовали функцию}
end.