ТутРешу.Ру

Составить программу: Найти сумму 1/2+2/3+3/4+4/5+…

Задание:

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

Решение:

var i: integer; s: real; begins: =0; for i: =1 to 50 dos: =s+i/ (i+1) write (s); end.




Знаете другой ответ?

Отправить свой ответ