Связь с администрацией сайта:       

demo

Среди толпы я одинок

Pascal вычислить сумму ряда S=x/2+x/3+x/4+x/5+...+x/17

Программа для вычисления суммы ряда S=x/2+x/3+x/4+x/5+...+x/17 на языке Pascal(Паскаль)

 

Var x,s:real; 
i:integer; 
Begin 
Read(x); 
s:=0; 
for i:=2 to 17 do 
s:=s+x/i; 
Writeln(s); 
End.
Rate this item
(1 Vote)
Login to post comments