Задать вопрос
17 июля, 18:51

Напиши те решения Var у : real; i : integer; у : = 1; i : = 1; while i > 1 do begin y:=y + 1 / i; i: = I - 1; end;

+1
Ответы (1)
  1. 17 июля, 20:09
    0
    I равно 1, цикл выполняться не будет, y так и останется 1.
Знаешь ответ?
Не уверен в ответе?
Найди верный ответ на вопрос ✅ «Напиши те решения Var у : real; i : integer; у : = 1; i : = 1; while i > 1 do begin y:=y + 1 / i; i: = I - 1; end; ...» по предмету 📙 Информатика, а если ответа нет или никто не дал верного ответа, то воспользуйся поиском и попробуй найти ответ среди похожих вопросов.
Искать другие ответы