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

прошу написать на русском языке

Question

Информатика

Ледя

9 декабря, 07:33

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

прошу написать на русском языке

+1

Ответы (1)

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

Добрыня · Answer 1

извини, но из языков программирования которые пишут на русском знаю только 1 С и это как по мне издевательство

пишу на старом добром паскале

var a, b, min, max:real;

read (a, b) ;

if (a
min:=a;

max:=b;

a: = (min+max) / 2;

b:=min*max;

end

else begin

min:=b;

max:=a;

b: = (min+max) / 2;

a:=min*max;

end;

writeln (a, b) ;

End.

даны 2 действительных числа. Меньше из них заменить полусуммой этих чисел, а большее-произведением этих чисел.прошу написать на русском языке

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

прошу написать на русском языке