Uses crt;
const
n:integer = 10;
var b: array[1..n] of byte;
a:integer;
d:byte;
begin
for d:=1 to 10 do b[d]:= random(10)+1;d:=1;
a:=1;
while (d < n) do begin a:=a*b[d]; d:=d+2;
end;
writeln(a);
<span>end.</span>
1 строчка = 0,1,2,3,4,5,6,8
2 = 0,2,4
3 что значит / ?
1)
<span>n = int(input('n ='))
i = <span>1
</span>while i <= n<span>:
</span>----i = i + <span>1
</span></span>----<span>if n \% i == 0<span>:
</span></span>--------<span>print(i,end=',')
2)
</span>print("Введите x:")
x = int(input())
print("Введите y:")
y = int(input())
s = x
k = 1
while s <= y:
k = k+1
s = 1.1*s
print("k = ", k, end = '')