Вопрос по информатике:
Даны два действительных различных числа х и у. Заменить меньшее из этих двух чисел и полусуммой,а большее их утроенной полуразность?
- 24.09.2017 21:06
- Информатика
- remove_red_eye 9882
- thumb_up 78
Ответы и объяснения 2
var
x, y : real;
begin
readln (x, y);
if x < y then
begin
x := (x + y) / 2;
y := 6 * abs (x - y);
end
else
begin
y := (y + x) / 2;
x := 6 * abs (y - x);
end;
writeln (x, ' ', y);
readln;
end.
- 27.09.2017 12:39
- thumb_up 49
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.