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

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

Question

Олюня

20 мая, 22:18

+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)