var
s: string;
i: integer;
begin
Write('s = '); Readln(s);
for i := 1 to Length(s) do
if s[i] = 'а' then s[i] := 'б';
Write(s);
Readln
end.
В ячейки в электронной таблице можно записать что угодно. Варианты:
формула, текст, число
выбирай
<span>2) каждое из чисел х у z положительно
( x>0) </span>∧ (y>0) ∧ (z>0)
<span>1) х у z равны между собой
(x=y)</span>∨ (x=z) ∨ (y=z)
<span>3) хотя бы одно из чисел х у z отрицательно
(x<0)</span>∨ (z<0) ∨ (y<0)
<span>4) хотя бы одно из чисел х у z не является положительным
</span>(x<0)∨ (z>0) ∨ (y>0)
<span>5) только одно из чисел х у z не больше 10
</span> (( x<=10) ∧ (y>10) ∧ (z>10)) ∨ ( ( x>10) ∧ (y<=10) ∧ (z>10)) ∨ ( ( x>10) ∧ (y>10) ∧ (z<=10))
<span>6) ни одно из чисел х у z не равно 104
</span>¬(x=104)∧ (¬(y=104))∧( ¬(z=104))
ВТОРОЕ ЗАДАНИЕ ПРОВЕРЬ УСЛОВИЕ ПОЖАЛУЙСТА? ЧТО-ТО В НЕМ НЕВЕРНО
для кодирования 16 символов потребуется 4 бита
2^4=16
40*4=160 бит=20 байт
Переведём оба числа в 10-чную систему счисления
1110₂=1*2³+1*2²+1*2¹+0*2°=8+4+2+0=14 девочек
18₁₆=1*16¹+8*16°=16+8=24 всего человек
24-14=10 мальчиков
Ответ: 10 мальчиков