Составить программу вычисления и печати суммы всех членов последовательности, меньших 0.8: S=1/3+2/4+3/5.....+i/(i+2)
Составить программу вычисления и печати суммы всех членов последовательности, меньших 0.8:
S=1/3+2/4+3/5.....+i/(i+2)
Гость
Ответ(ы) на вопрос:
Гость// PascalABC.NET 3.2, сборка 1374 от 10.01.2017
// Внимание! Если программа не работает, обновите версию!
begin
var i:=1;
var s:=0.0;
while true do begin
var t:=i/(i+2);
if t>=0.8 then break;
s+=t; i+=1
end;
Writeln('s=',s)
end.
Результат
s=4.34206349206349
Гость#include
using namepspace std;
int main() {
for(int i = 1, s = 0; (i/i+2) < 0.8; s+=(i/i+2), i++);
cout << s << endl;
}
Не нашли ответ?
Похожие вопросы