Помоему так...
const n=10;
var a:array[1..n] of integer; i,k:integer;
begin
writeln('Исходный массив: ');
for i:=1 to n do begin
a[i]:=random(10);
write(' ',a[i]);
end;
writeln;
for i:=1 to n do begin
if ((i mod 2) = 0) then
a[i]:=a[i]*2
else
a[i]:=a[i]*3;
end;
writeln('Конечный массив: ');
for i:=1 to n do
write(' ',a[i]);
<span>end.</span>
Ответ:
b=1
Объяснение:
Используем команды по порядку
12111
1: 17-b
2: (17-b)/2
3-5: (17-b)/2-b-b-b
В итоге получили 5,значит:
(17-b)/2-b-b-b=5 теперь просто найдем b
8,5-0,5b-b-b-b=5
3,5-3,5b=0
3,5b=3,5⇒b=1
Ответ:b=1
2596 в 10 системе счисления
Совсем ничего не видно.
Можно без отметить нарушение?