Вычислить сумму: s = 1 + 2 + 3 + ... + n, если значение n задано, не применяя формулу суммы членов арифметической прогрессии. 3 способа. можно и один способ, но желательно все 3. Заранее спасибо!
Вычислить сумму: s = 1 + 2 + 3 + ... + n, если значение n задано, не применяя формулу суммы членов арифметической прогрессии. 3 способа.
можно и один способ, но желательно все 3.
Заранее спасибо!
Гость
Ответ(ы) на вопрос:
Гость1.
var n,s,i:integer;
begin
write('n='); readln(n);
s:=0;
for i:=1 to n do s:=s+i;
writeln('s=',s);
end.
2.
var n,s,i:integer;
begin
write('n='); readln(n);
s:=0; i:=0;
while i