Несколько файлов могут передаваться по одной линии
Если ты написал огромный текст,сочинение и так далее,тебе его нужно перенести в другой блокнот,ибо же нужно просто куда-то перенести,эта функция очень помогает! Ведь ты просто выделишь этот текст,скопируешь этот текст,и вставишь куда нужно! И не нужно все это заново писать!
Var
i,n:integer;
s:real;
begin
writeln('Введите n');
readln(n);
for i:=1 to n do
s:=s+(1/i);
writeln(s);
<span>end.</span>
Вот: 41 , 47 , 53 , 59 , 65 , 71