Даны значения c, d, m, k. Напишите функцию min для вычисления значения следующего выражения: (min(c+d,m,k)+min(k,c,m))/(3+min(k,d-m,c+m)) — Pascal(Паскаль)

procedure (Var l,m,n,o:integer);
begin
min:=l;
if min>m then min:=m;
if min>n then min:=n;
if min>o then min:=o;
end;

Leave a Comment

89 − = 84