Вопрос задан 07.07.2023 в 18:04. Предмет Информатика. Спрашивает Миронова Ирина.

Ввести три числа. Найти сумму только положительных чисел. Если все три значения не удовлетворяют

условию, вывести на экран соответствующее сообщение.
0 0
Перейти к ответам

Ответы на вопрос

Внимание! Ответы на вопросы дают живые люди. Они могут содержать ошибочную информацию, заблуждения, а также ответы могут быть сгенерированы нейросетями. Будьте внимательны. Если вы уверены, что ответ неверный, нажмите кнопку "Пожаловаться" под ответом.
Отвечает Гурьевская Евгения.

Ответ:

program Programa;

var a, b, c, d: integer;

begin

 d:=0;

 writeln (' Введите три числа');

 readln (a, b, c);

 if (a>0)

 then

 begin

   d:=d+a;

 end;

 if b>0

 then

 begin

   d:=d+b;

 end;

 if c>0

 then

 begin

   d:=d+c;

 end;

 if (d=0)

 then

 begin

 writeln ('Все корни отрицательные');

 end

 else

 begin

 writeln (d);

 end;

end.

Объяснение:

На, сделал, проверил, работает.

0 0
Отвечает нейросеть ChatGpt. Будьте внимательны, ответы нейросети могут содержать ошибочные или выдуманные данные.

Конечно, вот пример кода на Python, который выполняет указанные действия:

python
# Ввод трех чисел num1 = float(input("Введите первое число: ")) num2 = float(input("Введите второе число: ")) num3 = float(input("Введите третье число: ")) # Инициализация переменной для хранения суммы положительных чисел sum_positive = 0 # Проверка и добавление положительных чисел к сумме if num1 > 0: sum_positive += num1 if num2 > 0: sum_positive += num2 if num3 > 0: sum_positive += num3 # Проверка на то, были ли найдены положительные числа if sum_positive > 0: print("Сумма положительных чисел:", sum_positive) else: print("Ни одно из введенных чисел не является положительным.")

Просто скопируйте этот код в среду программирования Python и выполните его. Вам будет предложено ввести три числа, после чего программа определит сумму только положительных чисел или выведет сообщение, что положительных чисел нет.

0 0

Похожие вопросы

Топ вопросов за вчера в категории Информатика

Последние заданные вопросы в категории Информатика

Задать вопрос