Ответы
Ответ дал:
0
var
s,k,n,i:integer;
begin
readln(n,k);
for i:=1 to n do
s:=(i*k)+s;
writeln(s);
end.
s,k,n,i:integer;
begin
readln(n,k);
for i:=1 to n do
s:=(i*k)+s;
writeln(s);
end.
Ответ дал:
0
k это степень, это такое решение.
Вас заинтересует
2 года назад
2 года назад
8 лет назад
8 лет назад
10 лет назад
10 лет назад
10 лет назад