Найти сумму семи нечетных чисел натурального ряда, начиная с N>0. . N вводится с клавиатуры.
Ответы на вопрос
Ответил petyaGavrikov
0
var n,s,i:integer;
begin
write('n = '); readln(n);
if n mod 2 = 0 then n:=n+1;
s:=0;
for i:=1 to 7 do
begin
s:=s+n;
n:=n+2;
end;
writeln('s = ',s);
end.
Пример:
n = 10
s = 119
begin
write('n = '); readln(n);
if n mod 2 = 0 then n:=n+1;
s:=0;
for i:=1 to 7 do
begin
s:=s+n;
n:=n+2;
end;
writeln('s = ',s);
end.
Пример:
n = 10
s = 119
Новые вопросы
География,
2 года назад
Математика,
2 года назад
Математика,
8 лет назад
Математика,
8 лет назад
Информатика,
9 лет назад
Физика,
9 лет назад