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

[Barcc]

процедуры и функции необходимы если в программе несколько раз выполняется одно и то же действие, например многократное вычисление по одной формуле. А если действие выполняется один раз? вот в этой программе:

program kjl;;
var x,y,z,r:real;
function f(x:real):real;
begin
f:=1+x*x;
end;
begin
readln (x,y,z);
r:=f((x+y)/2)+f((x+z)/2)+f((y+z)/2);
write (r);
end.

Есть ли преимущества, если есть то какие?

[Pro_RocK]

процедуры и функции необходимы если в программе несколько раз выполняется одно и то же действие

. Ну и?
Разница какая ? Можно её вообще не вызывать, скажем функция ClrScr из модуля Crt, хочешь очищай экран, не хочешь не очищай.

Есть ли преимущества, если есть то какие

пользоваться Чё бы не писать одно и тоже по нескольку раз.

[Serg2252]

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