<u>5</u>. 13^10=15^8
148^10=224^8
2018^10=3742^8
<u>6</u>. 13^10=D^16
148^10=94^16
2018^10=7E2^16
<u>7</u>. 318^10=100111110^2
318^10=476^8
318^10=13E^16
^- Система счисления...
Var
a:array[1..1000] of integer;
n, i, suma:integer;
begin
write('введите количество чисел массива ');
readln(n);
suma:=0;
for i:=1 to n do
begin
a[i]:=random(101)-70;
if(a[i]<0) then
suma:=suma+a[i];
end;
write('массив ');
for i:=1 to (n-1) do
write(a[i],', ');
writeln(a[n],' ');
writeln('сумма отрицательных элементов ',abs(suma));
end.
Подставим все значения и получим
1->(1 + 0) = 1
Ответ: 1
<html>
<head><title>Моя страничка</title></head>
<body>
<table align="center">
<tr><td>
<ul>
<li>Пункт списка</li>
</ul>
</td></tr>
</table>
</body>
</html>