Даю в форме EXEL
Заранее извиняюсь за оформление так как не знаю какое требование к оформлению и какие данные можно менять в таблице на условие пользователя, так что надеюсь это поможет разобраться самому.
Решение - в прилагаемом файле.
(¬Y ∨ X) ∨ (Y ∧ Z) ∧ ¬X
Var s,i:integer;
begin
write('s = ');
readln(s);
for i:=100 to 999 do
if (i div 100 + i div 10 mod 10 + i mod 10 < s)
then write(i,' ');
end.
Пример:
<span>s = 5
100 101 102 103 110 111 112 120 121 130 200 201 202 210 211 220 300 301 310 400 </span>
Ответ:
1001101001 = 1*2^9+0+0+1*2^6+1*2^5+0+1*2^3+0+0+1*2^0 = 512+0+0+64+32+0+8+0+0+1 = 512+64+32+8+1 = 617
Объяснение: