Программа abcpascal: ввести с клавиатуры два числа, - вопрос №9419588 от FreddikSmall 18.04.2022 10:15

Question

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

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