Информатика 9 класс.(Задачи по Паскалю) В компьютер вводится 2 числа. Если они не равны, то вычислить их произведение, иначе каждое число уменьшить в 2 раза. После этого компьютер должен вывести результат и сообщение ЗАДАЧА РЕШЕНА.
Program lol(input, output); var x, y, z:real; begin read (x, y); if x <> y then y:=x*y; else begin x:=x/2; y:=y/2; end; writeln ('x=', x, 'y=', y, 'z=', z); writeln ('ЗАДАЧА РЕШЕНА'); end.
Спааааасибо))
Расцеловать тебя готова
А Вы можете помочь составить алгоритм?
могу попробовать