Однажды мама испекла торт, но, не дожидаясь вечернего ужина, кто-то из детей откусил от него. на вопрос, кто же это сделал, дети дали такие ответы: света: я не ела торт; вова не ел. вова: это сделала не света; торт откусил кирилл. кирилл: я не кусал; это была света. как потом оказалось, кто-то из детей обманул оба раза, кто-то оба раза сказал правду, а кто-то - один раз правду, а второй раз обманул. 1. кто откусил торт? кирилл вова света 2. кто из детей оказался самый честный и оба раза сказал правду? света кирилл вова 3. кто солгал оба раза? света вова кирилл 4. кто из детей сказал правду один раз из двух? света вова кирилл

так 1)(Света) 2)(Кирил) 3)(Света)

var

i, a, b, n, n2, j: longint;

s: string;

flag: boolean;

begin

Write('Введите через пробел границы диапазона: ');

Readln(a, b);

if b < a then begin n := a; a := b; b := n end;

if a < 11 then a := 11;

for i := a to b do

begin

Str(i, s);

n := Length(s); n2 := n div 2; flag := true; j := 1;

repeat

flag := (s[j] = s[n - j + 1]);

j := j + 1

until (not flag) or (j > n2);

if flag then Write(i, ' ')

end;

end.

Тестовое решение:

Введите через пробел границы диапазона: 800 1500

808 818 828 838 848 858 868 878 888 898 909 919 929 939 949 959 969 979 989 999

Объяснение:

1 - True/False

2 - логическая операция, которая объединяет два высказывания в одно новое, которое будет являться истинным тогда и только тогда, когда оба исходных высказывания ложны.

3 - Конъюнкция

4 - X И Y И Z

5 - OR

6 - 1. Инверсия;

2. Конъюнкция;

3. Дизъюнкция;

4. Импликация;

5. Эквивалентность.

7 - логическая операция, которая преобразует исходное высказывание в новое, значение которого противоположно исходному.

8 - Импликация

9 - логическая операция, которая объединяет два высказывания в одно новое, которое будет являться истинным тогда и только тогда, когда оба исходных высказывания истинны

10 -  Конъюнкция

11 - ?

12 - ?

Объяснение: