Процедуры и функции Опции

[KriN]

1)Для заданных N и х1,х2,х3...хN написать программу,используяподходящую функцию
р1=произведение от i=1 до N(abs(i))/i!

p2=произведение от i=1 до N(abs(sqr(xi-p1)))/i!

p3=произведение от i=1 до N(abs(xi-p2)^3)/i!



2)Используя процедуру,поменять местами в кв.матрице заданного размера диагонали,прилегающие к главной диагонали

Сообщение отредактировано: KriN - 2.03.2009 17:46

[volvo]

В принципе, можно ещё проводить разные арифметические операции с функциями

Наконец-то...

Только формулировку поменяем: функции (в отличие от процедур) можно использовать непосредственно в выражениях.

function f(a, b: integer): integer;
begin
  f := { неважно, что делается};
end;
...
writeln('Y = ', 5 * f(10, 11));

Попробуй то же самое сделать с процедурой.