Ответы
Ответ дал:
0
Ответ:
var s,k,i: integer;
begin
write('Введите нечетное число: ');
readln(k);
s:=0;
i:=3;
while (i<=k) do
begin
s:=s+i*i;
i:=i+2;
end;
writeln('Сумма ряда при k=',k,' равна ',s);
end.
Вас заинтересует
2 года назад
3 года назад
9 лет назад
10 лет назад