Вопрос по информатике:
Даны числа А,В, и С .
Меньшее из них заменить полусуммой двух других
- 17.11.2017 21:14
- Информатика
- remove_red_eye 19663
- thumb_up 11
Ответы и объяснения 1
var
a, b, c: real;
begin
readln(a, b, c);
if (min(a, min(b, c)) = a) then
a := (b + c) / 2
else
if (min(a, min(b, c)) = b) then
b := (a + c) / 2
else
if (min(a, min(b, c)) = c) then
c := (b + a) / 2;
writeln(a, ' ', b, ' ', c);
end.
- 18.11.2017 08:32
- thumb_up 14
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.