Найти сумму вида 1/n, где n меняется от 1 до 100 в паскаль

Question

Найти сумму вида 1/n, где n меняется от 1 до 100 в паскаль

Answer 1

k:=1;

n:=0

for k to 100 do

begin

n:=n+1;

a:=1/n;

sum:=sum+a;

end;

примерно так (pascal долго качается так что я пока не проверял + если это из задачника там есть ответы с пояснением, удачи)

Comments

нет, есть ошибка, паскаль не принимает

---

можешь проверить и исправить

---

там вместо k пиши k:=1

---

все равно нет

---

начало я тоже написал, вар и тд, выдает ошибку