Программная реализация ветвящихся алгоритмов. Задание 1. Создать программу для решения задачи согласно варианту: Заданы числа a и b. Если a положительное, то найти их произведение и вывести в формате «Произведение чисел … и … равно …», в остальных случаях найти сумму и вывести в формате «Сумма чисел … и … равна …».
188
ОТВЕТЫ
PascalABC.NET
var
a, b: integer;
Begin
Readln(a, b);
if (a gt; 0) then
Writeln(Произведение чисел , a, и , b, равно , a * b)
else
Writeln(Сумма чисел , a, и , b, равна , a + b);
end.
var
a, b: integer;
Begin
Readln(a, b);
if (a gt; 0) then
Writeln(Произведение чисел , a, и , b, равно , a * b)
else
Writeln(Сумма чисел , a, и , b, равна , a + b);
end.
174
Отв. дан
Для написания вопросов и ответов необходимо зарегистрироваться на сайте
Другие вопросы в разделе - Информатика
Meafdezen
Рисунок преобразовали так, что он стал занимать в памяти ...
2019-02-01 09:18:23
Савва
У исполнителя Квадратор две команды, которым присвоены номера: 1. ...
2019-02-01 09:17:44
Иезекииль
СРОЧНО ДОБРЫЕ ЛЮДИ ПОМОГИТИ ПО ИНФОРМАТИКЕ! ...
2019-02-01 09:11:14
Manatus