Решить ) 1)дано целое число ,если оно не четное ,то - вопрос №246486913 от cat2522 28.12.2022 19:58

Question

Информатика: Решить ) 1)дано целое число ,если оно не четное ,то увеличить его на 3,иначе увеличить его в 5 раз. 2)даны 2 числа вещественного типа не равные друг другу.меньшее из них заменить половиной их суммы ,а большее - их удвоенным произведением. 3)даны 2 числа k и m.если первое число отрицательно ,то его значение заменить его модулем; иначе второе число заменить единицей .результат (оба числа) вывести на экран.

cat2522 · Answer

1) if x mod 2=0 then x:=x+3, else x:=5*x;2) if x y then x:=(x+y)/2, else y:=3*x*y;3) if k 0 then k:=abs(k), else m:=1;    writeln ( k= , m= );    end....