Составьте программу S=1/a+1/a^2+1/a^3+...+1/a^2n-2 Пожалуйста!!!! Очень срочно!!!!

Ответы:
Алексей Тихонов
31-03-2016 08:06

var  n, i : integer;  a, s, k : real;begin  read (a, n);  s := 0;  k := a;  for i := 1 to 2 * n - 2 do  begin    s := s + (1 / k);    k := k * a;  end;  write (s);end.

Также наши пользователи интересуются:

Картинка с текстом вопроса от пользователя Tolik Lytvynenko

⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Составьте программу S=1/a+1/a^2+1/a^3+...+1/a^2n-2 Пожалуйста!!!! Очень срочно!!!!» от пользователя Tolik Lytvynenko в разделе Экономика. Задавайте вопросы и делитесь своими знаниями.

Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!