ответ:
а́вторское пра́во — в объективном смысле — институт гражданского права, регулирующий правоотношения, связанные с созданием и использованием (изданием, исполнением, показом и т. д.) произведений науки, или искусства, то есть объективных результатов творческой деятельности людей в этих областях. программы для эвм и базы данных также охраняются авторским правом. они приравнены к произведениям и сборникам, соответственно[1].
название «авторское право» является условным, так как закон регулирует и охраняет права «правообладателя», а не автора.
термин копира́йт © (. copyright, от «копировать» и «право») в языке обозначает авторское право, то есть право копировать, воспроизводить[2].
nn=50;
var
i,n,a,b,im,min:integer;
x:array[1..nn] of integer;
begin
ClrScr;
Write('n= '); Read(n);
Write('b,a= '); Read(b,a);
im:=0;
for i:=1 to n do begin
Write('x[',i,']='); Read(x[i]);
if im=0 then im:=i
else begin if x[i]<x[im] then im:=i end
end;
Writeln;
if (im=0) or (not (x[im] in [b..a])) then Writeln('No solution')
else Writeln('x[',im.']=',x[im],' is minimal');
ReadKey
end.
Тестовое решение:
n=5
b,a= 4 8
x[1]=9
x[2]=7
x[3]=9
x[4]=6
x[5]=8
x[4]=6 is minimal