Пример 14.1 (Продолжение)

Какая задача решается с помо-щью данной программы? Запишите соответствующее математическое выражение.

Что делает и как описывается процедура?

Как в программе вызывается

процедура?

Запишите формальные и фак-тические параметры процеду-ры Sum(a,b,c).

Объяснить работу програм- мы.

Провести вычисления по про-грамме для следующих пара-метров:

K=1, L=4, a=2, b=3;

K=4, L=1, a=3, b=2.

Как задать параметр c?

Как можно проследить по программе передачу управле-ния на процедуру?

Пример 14.2 Определить решаемую по программе задачу и провести
вычисление.

Program PR_14_2;

var S,a,b,c,d,e:integer;

Procedure Sum(x,y:integer; var z:integer);

Begin

z:=x+y;

end;

begin

writeln ('vvedite a,b,c,d,e');

read(a,b,c,d,e);

Sum(a,b,c);

S:= c +d+e;

writeln('Sum=',c:4);

writeln('S=',S:4)

end.