Даны m, n, k. Найти a = min(m+n+k, mnk)

надо решить в паскале(условный оператор)

1

Ответы и объяснения

Лучший Ответ!
2011-12-28T06:46:19+00:00

var

a,m,n,k:real;

begin

readln(m,n,k);

if (m+n+k)<(m*n*k) then 

a:=m+n+k

else

a:=m*n*k;

writeln(a);

end.