Требовалось написать программу, которая определяет, имеется ли среди введенных с клавиатуры положительных целых чисел а и b хотя бы одно четное. была написана следующая программа: var a, b: integer; begin readln(a, b); a : = a mod 2; if a > 0 then b : = b mod 2; if b > 0 then writeln ('четных чисел нет') else writeln ('четное число есть'); end. известно, что программа написана с ошибками. последовательно выполните три : укажите, как, по вашему мнению, нужно доработать программу (не используя слож-ные условия), чтобы не было случаев ее неправильной работы;

274

310

Посмотреть ответы 2

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

марьям2789

Информатика

4,5(79 оценок)

Var a,b: integer; begin readln(a,b); if a mod 2= 0 then writeln('есть чётное') else if b mod 2=0 then writeln('есть чётное') else writeln('нет чётных); end.

t89633261566polypony

Информатика

4,7(83 оценок)

архетектура и принципы

Популярно: Информатика

Темы

Получить
полный доступ

150 000+ пользователей

Оформить подписку