Программа abcpascal: ввести с клавиатуры два числа, - вопрос №9420490 от Ga1mer 05.10.2022 00:37

Question

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

Ga1mer · 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: ввести с клавиатуры два числа, если произведение этих чисел положительно, то на