2. В ячейке В2 записана формула =SA$2+100 (значение в ячейке условно не показано): A2-7 Аз-5, А4-15, А5-3, ВС=11, В4-21, В 5-15, C2-1,C3=2, C4=3. Ее скопировали в ячейку С4. Какое значение будет выведено в ячейке С43
Чтобы выражение было истинным, необходимо, чтобы (х > 4) и ((х < 10) или (х < 13)) были истинными одновременно. Чтобы ((х < 10) или (х < 13)) было истинными, необходимо, чтобы либо (х < 10), либо (х < 13) были истинными, либо оба одновременно. => 13>x>4 => Всего 8 чисел (12, 11, 10, 9, 8, 7, 6, 5)
Можно проверить: (12 > 4) и ((12 < 10) или (12 < 13)) =1 и (0 или 1)=1и1=1 (11 > 4) и ((11 < 10) или (11 < 13)) =1 и (0 или 1)=1и1=1 (10 > 4) и ((10 < 10) или (10 < 13)) =1 и (0 или 1)=1и1=1 (9 > 4) и ((9 < 10) или (9 < 13)) =1 и (1 или 1)=1и1=1 (8 > 4) и ((8 < 10) или (8 < 13)) =1 и (1 или 1)=1и1=1 (7 > 4) и ((7 < 10) или (7 < 13)) =1 и (1 или 1)=1и1=1 (6 > 4) и ((6< 10) или (6 < 13)) =1 и (1 или 1)=1и1=1 (5 > 4) и ((5 < 10) или (5 < 13)) =1 и (1 или 1)=1и1=1
var n: integer;
begin
repeat
n:=readinteger('Введите порядковый номер: ');
until n in [1..52];
case (n mod 13) of
1: write ('Двойка');
2: write ('Тройка');
3: write ('Четверка');
4: write ('Пятерка');
5: write ('Шестерка');
6: write ('Семерка');
7: write ('Восьмерка');
8: write ('Девятка');
9: write ('Десятка');
10: write ('Валет');
11: write ('Дама');
12: write ('Король');
0: write ('Туз');
end;
if n mod 13<>0 then n:=(n div 13) + 1 else n:=n div 13;
case n of
1: write (' бубен');
2: write (' черви');
3: write (' трефы');
4: write (' пики');
end;
end.