Ответы
Ответ дал:
0
program first;var a, n, i: integer;rez: real;BEGIN readln(a); readln(n); for i:=0 to n do rez := rez + 1/(a+n); writeln(rez)END.
Приложения:
Вас заинтересует
2 года назад
2 года назад
9 лет назад
10 лет назад