Операция "не". Превращает все "1" в "0" и наоборот
const
handsfree = false;
nmax = 10;
random_min = -50;
random_max = 50;
var
a: array[0..nmax] of real;
i, n: integer;
sum, x: real;
begin
{ввод массива}
n := nmax;
if handsfree then begin
for i := 0 to n do
begin
a[i] := random(random_max - random_min) + random_min;
write(a[i], ' ');
end
end
else begin
for i := 0 to n do
readln(a[i]);
end;
writeln();
{подсчет суммы}
write('x = ');
readln(x);
sum := a[n];
for i := n - 1 downto 0 do
sum := sum * x + a[i];
writeln('S = ', sqrt(sum));
end.
Актуальность состоит в том, что вирусы тормозят компьютер, т к отслеживают все ваши действия, запоминает пароли и т д. Борьба с вирусами спасает наши конфиденциальную информацию. Но вирусы развиваются, они находят новые лазейки в защите компьютера, поэтому нам очень важно все время бороться с ними.
Переведём 31 в другие системы, начиная с двоичной
31_10 = 11111_2 = 1011_3 = 133_4 = 111_5 = 51_6 = 43_7
---------------
Остаток от деления 32 на n
n - остаток
<span><span><span>
5
2
</span>
<span>
6
2
</span>
<span>7
4
</span>
<span>
8
0
</span>
<span>
9
5
</span>
<span>
10
2
</span>
<span>
11
10
</span>
<span>
12
8
</span>
<span>
13
6
</span>
<span>14
4
</span>
<span>
15
2
</span>
<span>
16
0
</span>
<span>
17
15
</span>
<span>18
14
</span>
<span>
19
13
</span>
<span>
20
12
</span>
<span>
21
11
</span>
<span>
22
10
</span>
<span>
23
9
</span>
<span>
24
8
</span>
<span>
25
7
</span>
<span>
26
6
</span>
<span>
27
5
</span>
<span>28
4
</span>
<span>
29
3
</span></span></span>
-------
65_8 = 53_10 = 1 + n +3n^2
<span>3 n^2 + n - 52 = 0
</span>n=4
Программы на Кумире прилагаются.