Заменим символы операций на более привычные (логическое сложение на сложение, логическое умножение - на умножение), но будем помнить, что все же это не арифметика, хотя и тут умножение "старше" сложения и выполняется первым. x=19+17*13+22*14 1) 17₁₀*13₁₀ 17₁₀ = 10001₂; 13₁₀=01101₂ Правила умножения поразрядно: 1*1=1, иначе 0 10001 *01101
00001 = 1₂ 2) 19₁₀+1₂ 19₁₀=10011₂ Правила сложения поразрядно: 0+0=0, иначе 1 10011 +00001
Заменим символы операций на более привычные (логическое сложение на сложение, логическое умножение - на умножение), но будем помнить, что все же это не арифметика, хотя и тут умножение "старше" сложения и выполняется первым. x=19+17*13+22*14 1) 17₁₀*13₁₀ 17₁₀ = 10001₂; 13₁₀=01101₂ Правила умножения поразрядно: 1*1=1, иначе 0 10001 *01101
00001 = 1₂ 2) 19₁₀+1₂ 19₁₀=10011₂ Правила сложения поразрядно: 0+0=0, иначе 1 10011 +00001
program HelloWorld;
var i: integer;
begin
for i:=33 to 555 do
begin
if i mod 13 = 0 then writeln(i);
end;
end.
Результат:
39 52 65 78 91 104 117 130 143 156 169 182 195 208 221 234 247 260 273 286 299 312 325 338 351 364 377 390 403 416 429 442 455 468 481 494 507 520 533 546