2
3
4
5
6
7
8
9
10
11
12
13
uses crt;
var i,s,n,x:integer;
begin
clrscr;
writeln('введите кол-во слагаемых и x');
readln(n,x);
for i:=1 to n do
writeln(i,' слагаемое = ',x+i);
s:=s+x+i;
end;
writeln('сумма равна ',s);
end.емых вида: x + 2, где x – данное число, а i меняется от 1 до n
2
3
4
5
6
7
8
9
10
11
12
13
uses crt;
var i,s,n,x:integer;
begin
clrscr;
writeln('введите кол-во слагаемых и x');
readln(n,x);
for i:=1 to n do
begin
writeln(i,' слагаемое = ',x+i);
s:=s+x+i;
end;
writeln('сумма равна ',s);
end.емых вида: x + 2, где x – данное число, а i меняется от 1 до n