При цитировании статьи, размещенной на чьем-то сайте, необходимо указать имя автора, название статьи и адрес сайта, с которого взята статья.
Согласно Ст. 1274 ГК РФ (Свободное использование произведения в информационных, научных, учебных или культурных целях), «Допускается без согласия автора или иного правообладателя и без выплаты вознаграждения, но с обязательным указанием имени автора, произведение которого используется, и источника заимствования:
1) цитирование в оригинале и в переводе в научных, полемических, критических, информационных, учебных целях, в целях раскрытия творческого замысла автора правомерно обнародованных произведений в объеме, оправданном целью цитирования, включая воспроизведение отрывков из газетных и журнальных статей в форме обзоров печати»
При цитировании статьи, размещенной на чьем-то сайте, необходимо указать имя автора, название статьи и адрес сайта, с которого взята статья.
Согласно Ст. 1274 ГК РФ (Свободное использование произведения в информационных, научных, учебных или культурных целях), «Допускается без согласия автора или иного правообладателя и без выплаты вознаграждения, но с обязательным указанием имени автора, произведение которого используется, и источника заимствования:
1) цитирование в оригинале и в переводе в научных, полемических, критических, информационных, учебных целях, в целях раскрытия творческого замысла автора правомерно обнародованных произведений в объеме, оправданном целью цитирования, включая воспроизведение отрывков из газетных и журнальных статей в форме обзоров печати»
ответ: 5
procedure Ввод(a: array of string);
begin
for var i := 0 to a.High do
a[i] := ReadlnString;
end;
procedure Вывод(a: array of string);
begin
a.PrintLines
end;
function Сумма(a: array of string): integer;
begin
Result := a.Select(t -> t.ToInteger).Sum;
end;
begin
var n := ReadlnInteger('Укажите общее количество строк:');
var a := new string[n];
Ввод(a);
Вывод(a);
Println('Сумма равна', Сумма(a))
end.