Составьте программу, заменяющую меньшее из двух данных чисел произведением данного числа и разности данных чисел, а большее - суммой данных чисел

Question

Информатика

Лоренцио

28 мая, 09:45

Составьте программу, заменяющую меньшее из двух данных чисел произведением данного числа и разности данных чисел, а большее - суммой данных чисел

+2

Ответы (2)

Знаете ответ на вопрос?

Джиосия · Answer 1

П1 П0 - x<0 12 0 П8 1 П9 БП 18 1 П8 0 П9 БП 18

КИП8 КИП9 - КИП9 * П2 КИП8 КИП9 + КП8 ИП2 КП9

Аламдор · Answer 2

program pf;

var x, y, a, b:integer;

begin

read (x) ;

read (y) ;

a:=x; b:=y;

if x>y then begin x:=a*b; y:=a+b; end else begin x:=a+b; y:=a*b; end;

write (x, y) ;

end.