Var
i, n: integer;
begin
readln(n);
for i := 10 to 99 do
if (i mod 10 + i div 10 = n) then
writeln(i);
end.
Http://yaforyou.ru/?q=%D0%AD%D0%BA%D1%81%D0%BF%D0%BB%D1%83%D0%B0%D1%82%D0%B0%D1%86%D0%B8%D0%BE%D0%BD...
Var x,y,z:integer;
begin
x:=5; y:=-6
if (x>y) then z:=x+y else z:=y-x;
Writeln(Z);
end.
1.
X&¬M&¬HvX&M&HvX&¬M&H
Упростим:
<span>X&¬M&¬HvX&&<span>H
2.
</span></span><span>Не все слоны серые и пять не равно дважды два
</span>3 и 4 смотреть прикрепленные файлы.
Лист Excel живой, можно подставить свои данные.
Таблицу истинности подставляем в лист СДНФ3, получаем формулу, упростив, получим результат.
Лист защищен без пароля, чтобы случайно не повредить формулы. Снимаем защиту, копируем элементы, получаем результат.
Ответ: Б)2
Кажется так. Но ты сам попробуй подумать.