var
timeInSec:integer; // время в секундах
color, s, m, h:byte;
begin
h := 4; //часы
m := 5; //минуты
s := 23; //секунды
timeInSec := h * 3600 + m * 60 + s; //перевод времени в секунды
color := (timeInSec div 10) mod 3; {целочисленно делим на 10, чтобы узнать сколько раз светофор изменил цвет}
{потом находим остаток деления на 3(количество цветов), чтобы узнать какой сейчас цвет}
case color of //вывод ответа
0: writeln('Горит зеленый свет'); //0 - это зеленый свет
1: writeln('Горит желтый свет'); //1 - это желтый свет
2: writeln('Горит красный свет'); //2 - это крсный свет
end;
end.
тверждения "Аня, Вика и Сергей" пойдут в кино обозначим каждое как A,B,C
1 A-> B&C
2 A≡C
3 C->B
Эти утверждения можно представить в конъюнктивной форме
1) -A ∨ B&C
2) A&C ∨ -A&-C
3) -C∨B
Нужно найти ситуацию, при которых верны ровно 2 из этих утверждений.
Если верные 1) и 2), этому удовлетворяют ситуации "пойдут все" или "никто не пойдет" или "пойдет Вика"
Во всех этих ситуация 3) тоже верно.
Если верны 2) и 3), этому соответствуют те же ситуации.
0 0 0
0 1 0
1 1 1
Если верны 1) и 3), то при ситуации "пойдут сергей и Вика", 2) неверно. 1) условие не означает, что если пойдут Вика и Сергей, Аня тоже непременно пойдет.
ну где-то так 1
