Программная реализация ветвящихся алгоритмов.
Задание 1. Создать программу для решения задачи согласно варианту:
Заданы числа a и b. Если a положительное, то найти их произведение и вывести в формате «Произведение чисел … и … равно …», в остальных случаях найти сумму и вывести в формате «Сумма чисел … и … равна …».
PascalABC.NETvar a, b: integer;BeginReadln(a, b);if (a > 0) thenWriteln('Произведение чисел ', a, ' и ', b, ' равно ', a * b)elseWriteln('Сумма чисел ', a, ' и ', b, ' равна ', a + b);end.