Информатика, опубликовано 2018-08-22 18:27:46 by Гость
Даны действительные а,b,с,d. Получить min(a,b) + max(a,b,c) ____________________ 1+max(a,b,c,d)
Ответ оставил Гость
//PascalABC.NET 3.2 сборка 1318
Var a,b,c,d:real;
begin
readln(a,b,c,d);
writeln((min(a,b)+max(max(a,b),c))/(1+max(max(max(a,b),c),d)));
end.
Пример ввода:
1 2 3 4
Пример вывода:
0.8
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.
Форма вопроса доступна на