Y=1/1-2/2-3/3-4/4-(...)-n/n Составить блок-схему и программу на паскале. Заранее спасибо
Y=1/1-2/2-3/3-4/4-(...)-n/n
Составить блок-схему и программу на паскале.
Заранее спасибо
Гость
Ответ(ы) на вопрос:
Гость//Pascal ABC.NET v3.1 сборка 1172
Var
y:real;
i,n:integer;
begin
readln(n);
y:=1;
for i:=2 to n do
y:=y-i/i;
writeln(y);
end.
Пример ввода:
3
Пример вывода:
-1
Не нашли ответ?
Похожие вопросы