Даны два действительных различных числа х и у. Заменить меньшее из этих двух чисел и полусуммой, а большее их утроенной полуразность?

Question

Информатика

Паисия

17 июля, 14:43

Даны два действительных различных числа х и у. Заменить меньшее из этих двух чисел и полусуммой, а большее их утроенной полуразность?

+3

Ответы (2)

Знаете ответ?

Валерий · Answer 1

var i, jx, y:longint;

begin

read (x, y) :

i:=x;

j:=y

if x
if y
writeln (x,' ', y) ;

end.

Евгения · Answer 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.