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

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

Question

Панюта

6 января, 10:31

+3

Ответы (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)