Комментарии: Решаем задачи Абрамян на Паскале. Boolean10

Автор: Anton

Anton — Tue, 27 Oct 2015 03:26:12 +0000

В ответ на olegst1975. Добавил это решение. Своё оставил, хотя бы для того, что бы можно было увидеть, как правильное использование операторов может сократить код. К стати раз пошло такое обсуждение длинное предлагаю ещё одно решение.

Автор: Anton

Anton — Tue, 27 Oct 2015 03:23:12 +0000

Поправил.
Было:

Writeln(((A mod 2>0) and (B mod 2=0)) or ((A mod 2=0) and (B mod 2>0))

1	Writeln(((A mod 2>0) and (B mod 2=0)) or ((A mod 2=0) and (B mod 2>0))

Стало:

Writeln(((A mod 2<>0) and (B mod 2=0)) or ((A mod 2=0) and (B mod 2<>0))

1	Writeln(((A mod 2<>0) and (B mod 2=0)) or ((A mod 2=0) and (B mod 2<>0))

Автор: Anton

Anton — Tue, 27 Oct 2015 03:01:55 +0000

Если код включать в тег

или

то будет выглядеть так:

(A mod 2<>0) и (B mod 2<>0)

1	(A mod 2<>0) и (B mod 2<>0)

Автор: olegst1975

olegst1975 — Mon, 26 Oct 2015 20:21:00 +0000

Предлагаю использовать XOR(оно ж просто для этого случая) — (a mod 2 не равно 0 ) xor (b mod 2 не равно 0).

Автор: olegst1975

olegst1975 — Mon, 26 Oct 2015 20:18:37 +0000

Люблю HTML — (A mod 2 не равно 0) и (B mod 2 не равно 0)

Автор: olegst1975

olegst1975 — Mon, 26 Oct 2015 20:16:44 +0000

Чтобы работало с отрицательными числами — (A mod 2<>0) и (B mod 2<>0)