import random as r
n=int(input())
array=[]
m=105
for i in range(n):
x=r.randint(-15,101)
array.append(x)
if x<m and x%2==0:
m=x
if m==105:
print('минимум: нет')
print(array,'\nминимум:',m)
Program enot;
Var n,s,i:integer;
begin
read(n);
s:=0;
for i:= 1 to n do
if i mod 2 = 0 then
s:=s+i;
writeln('summa = ',s);
end.<span>
2.</span>Program enot;
Var n,p,i:integer;
begin
read(n);
p:=1;
for i:= 1 to n do p:=p*i;
writeln('proizvedenie = ',p);
<span>end.</span>
1) var i,n:integer;
c,d:integer;
a:array[1..1000] of integer;
begin write('введите c,d,n');
read(c,d,n);
for i:=1 to n do begin
a[i]:=random(100);
write(a[i],' ');
end;
for i:=1 to n do begin
if (a[i]>=c) and (a[i]<=d) then write(a[i],' ');
end;
end.
2) по ссылке на файл
A) 7,68 б) <span>5000000
2. </span><span>13421772.8
</span>3. <span>11</span>
Количество лепестков количество листьев серединка ____________________________________________________________________
признаки признаки
4 лепестка,6,7. 3 лепестка,4,6. красная,фиолетовая,
синяя,жёлтая