Program n1;
Uses CRT;
Var a,b: integer;
begin
Writeln('Vvedite chisla');
Readln(a,b);
If a>b then writeln(2*a*b,' ',a+b/2:2:2)
else if a=b then writeln('ravny!')
else writeln(a+b/2:2:2,' ',2*a*b);
readln
end.
<h2>Пункт А</h2>
K mod 7 = K div 5 - 1 при K = 15
15 mod 7 = 15 div 5 - 1
(7 · 2 + 1, где 1 - это остаток от деления)
1 = 3 - 1
1 = 2
<h3>false</h3><h2>Пункт Б</h2>
odd(trunc(10 · P)) при P = 0.182
odd(trunc(10 · 0.182)
odd(trunc(1.82))
odd(1)
<h3>true</h3><h2>Пункт В</h2>
not odd(N) при n = 0
not odd(0)
not false
<h3>true</h3><h2>Пункт Г</h2>
t and (P mod 3 = 0) при t = true и P = 10101
true and (10101 mod 3 = 0)
true and true
<h3>true</h3><h2>Пункт Д</h2>
(x · y <> 0) and (y > x) при x = 2 и y = 1
(2 · 1 <> 0) and (1 > 2)
true and false
<h3>false</h3><h2>Пункт Е</h2>
a or not b при a = false и b = true
false or not true
false or false
<h3>false</h3>
1)Здесь можно применить формулу
<span>2^i = N
</span>2)подставим под N=8
<span>2^i = 8
</span><span> i= 3 (здесь нужно посчитать что 2^3=2*2*2=8)
</span>Ответ: 3 бита одна буква
Если число дано в десятичной системе счисления, то в двоичной системе получится 111001,01, в восьмиричной 71,2, в шестнадцатиричной 39,4