Напишите программу доя АВС Паскаль

" вычислите сумму (1/2+1) + (1/2+2) + (1/2+3) + ... + (1/2+n)

Question

Христоня

7 марта, 12:35

+2

Ответы (1)

Знаете ответ на вопрос?

Симеон · Answer 1

Var n, i:integer;

S:real;

begin read (n) ;

S:=0;

for i:=1 to n do

S:=S+1/2+i;

writeln (S) ;

end.

Напишите программу доя АВС Паскаль" вычислите сумму (1/2+1) + (1/2+2) + (1/2+3) + ... + (1/2+n)