Задать вопрос
25 мая, 19:21

Составить программу вычисления значения выражения y=1+1/2+1/3 + ... 1/20!

+5
Ответы (1)
  1. 25 мая, 21:30
    -1
    Var

    k:real;

    i,:integer;

    begin

    k:=0;

    for i:=1 to 20 do

    k:=k+1/i;

    write (k);

    end.
Знаешь ответ?
Не уверен в ответе?
Найди верный ответ на вопрос ✅ «Составить программу вычисления значения выражения y=1+1/2+1/3 + ... 1/20! ...» по предмету 📙 Информатика, а если ответа нет или никто не дал верного ответа, то воспользуйся поиском и попробуй найти ответ среди похожих вопросов.
Искать другие ответы