Даны два действительных различных числа х и у. Заменить меньшее из этих двух чисел и полусуммой,а большее их утроенной полуразность?
var i,jx,y:longint;
begin
read(x,y):
i:=x;
j:=y
if x if y writeln(x, ,y); end.Оцени ответ
Вход
Регистрация
Задать вопрос
Даны два действительных различных числа х и у. Заменить меньшее из этих двух чисел и полусуммой,а большее их утроенной полуразность?
var i,jx,y:longint;
begin
read(x,y):
i:=x;
j:=y
if x if y writeln(x, ,y); end.Оцени ответ