Процедуры

[lavrentev]

Помогите решить задачку, пожалуйста
Необходимо найти периметр треугольника, используя процедуры

[Alex11223]

Вы не перепутали "помогите" и "сделайте за меня"?

Покажите свои наработки, конкретные вопросы и т.п.

Или в раздел Фриланс если вы не хотите ничего делать, а ищете кого-то, кто выполнит ваши задачи за вознаграждение.

[newerow1989]

procedure Perimetr(a,b,c:real; var p:real);
begin
   p:=a+b+c;
end;

var a,b,c,p:real;
begin
   Write('a = '); Readln(a);
   Write('b = '); Readln(b);
   Write('c = '); Readln(c);
   Perimetr(a,b,c,p);
   Writeln('p = ',p:8:5);
   Readln;
end.