Программная реализация ветвящихся алгоритмов. 1. создать программу для решения согласно варианту: заданы числа a и b. если a положительное, то найти их произведение и вывести в формате «произведение чисел … и … равно …», в остальных случаях найти сумму и вывести в формате «сумма чисел … и … равна …».

Alina243jhj Alina243jhj    3   10.09.2019 16:40    0

Ответы
sad1300 sad1300  07.10.2020 05:41
PascalABC.NET

var 

a, b: integer;

Begin
Readln(a, b);
if (a > 0) then
Writeln('Произведение чисел ', a, ' и ', b, ' равно ', a * b)
else
Writeln('Сумма чисел ', a, ' и ', b, ' равна ', a + b);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика