Единственный стопроцентный вариант не допустить воровства контента — не публиковать его. Может звучать абсурдно, но на самом деле так и есть. Бороться с плагиатом в интернете всё равно что бороться с кариесом. Это война, в которой невозможно победить, но сражаться необходимо. Инструменты для этого есть, но гарантий никаких.
Иногда воруют по мелочи: статью, картинку, фотографию. А иногда по-крупному: целиком страницы, сайты или блоги. Закон в любом случае на стороне автора. Использование контента возможно только с его согласия. А отсутствие запрета не означает согласие. Если контент украли, значит, нарушили закон и за это можно наказать.
Объяснение:
var
a: array[1..10] of integer;
i,s: integer;
begin
s:=0;
for i:= 1 to 10 do
begin
a[i]:=random(1,1000);
s:=s+a[i];
end;
writeln(s);
end.