Составить программу ** языке Pascal, которая позволяет ввести два числа. Если оба числа...

Question

Составить программу на языке Pascal, которая позволяет ввести два числа. Если оба числа положительные, то вычислить их сумму, иначе произведение.

Answer 1

PascalABC.NET 3.3.5, сборка 1669 от 21.05.2018
Внимание! Если программа не работает, обновите версию!

begin
  var (a,b):=ReadReal2('Введите через пробел два числа:');
  If (a>0) and (b>0) then Writeln(a+b) else Writeln(a*b)
end.

Comments

Можете глянуть ещё эти две задачи?

---

https://znanija.com/task/29157606

---

https://znanija.com/task/29226433