Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
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.
a,b,c: real;
readln(a,b,c);
writeln((a+b+c)/3);
Популярные вопросы