Составить программу на языке pascal, которая позволяет - вопрос №9184342 от Бекзат2000 07.10.2021 14:02

Question

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

Бекзат2000 · Answer

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.