Задание:
Составить программу: Найти сумму 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.
Знаете другой ответ?
Составить программу: Найти сумму 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.
Знаете другой ответ?