Программа abcpascal: ввести с клавиатуры два числа, - вопрос №9419813 от мгмлидт 01.02.2023 08:08

Question

Информатика: Программа abcpascal: ввести с клавиатуры два числа, если произведение этих чисел положительно, то найти их разность, а иначе найти их деление.

мгмлидт · Answer

PascalABC.NET 3.4.2, сборка 1837 от 11.10.2018Внимание! Если программа не работает, обновите версию!

begin

var (a, b) := ReadReal2;

if a * b > 0 then Println(a - b)

else Println(a / b)

end.

Программа abcpascal: ввести с клавиатуры два числа, если произведение этих чисел положительно, то на