Составить программу: Найти сумму 1/2+2/3+3/4+4/5+...+50/51 Прогр Паскаль

Составить программу: Найти сумму 1/2+2/3+3/4+4/5+...+50/51 Прогр Паскаль
Гость
Ответ(ы) на вопрос:
Гость
var i:integer;       s:real;   begin s:=0; for i:=1 to 50 do s:=s+i/(i+1)   write(s);   end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы