Логическая операция и целый тип данных

@знаю все и вся · Регистрация: 17.02.2013

Author24 — интернет-сервис помощи студентам

Pascal

readln(a,b);
a:=a mod 2;
b:=b mod 2;
bol:=a and b;

Как совместить логический тип данных с целым? надо проверить истинность высказывания, что А и В нечетные. У самого не выходит.

Добавлено через 25 минут
Никто не поможет?

@Nikto · 18.03.2013, 19:02

Pascal

1	if (a mod 2<>0) and (b mod 2<>0) then writeln('оба нечётные');

@NoviiMir · 18.03.2013, 19:03

Pascal

1	bol:=(a mod 2 <> 0) and (b mod 2 <> 0)

@знаю все и вся · 18.03.2013, 19:12 **[ТС]**

Сообщение от NoviiMir

Pascal

1	bol:=(a mod 2 <> 0) and (b mod 2 <> 0)

а почему такое выражение не действует с целым и логическим типом данных, в чем разница?

Pascal

1	bol:=(a mod 2) and (b mod 2);

@NoviiMir · 18.03.2013, 19:27

Сами подумайте, результат (a mod 2) - число, результат (b mod 2) - тоже число. и у вас получается, к примеру, (0 and 1). смысл видите?

@NoviiMir 10 / 10 / 2 Регистрация: 23.09.2012 Сообщений: 427
	18.03.2013, 19:27	5
	Сами подумайте, результат (a mod 2) - число, результат (b mod 2) - тоже число. и у вас получается, к примеру, (0 and 1). смысл видите? 1