Ответы
Ответ дал:
0
PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программа не работает, обновите версию!
begin
var (x,y,z):=ReadReal3;
var u:=Min((x+y+z)/2,x*y*z)+1;
Writeln(u)
end.
Внимание! Если программа не работает, обновите версию!
begin
var (x,y,z):=ReadReal3;
var u:=Min((x+y+z)/2,x*y*z)+1;
Writeln(u)
end.
Вас заинтересует
2 года назад
3 года назад
3 года назад
9 лет назад
9 лет назад
10 лет назад
10 лет назад