Написать программный код задачи для Visual Basic Задача: Вычислите - №2037733

Написать программный код задачи для Visual Basic Задача: Вычислите 1+1/2+1/3+1/4+...+1/n,где n задается с экрана

Желательно еще написать,что выносить на форму
- Предмет:
  Информатика
- Автор:
  alfh4m1
- 5 лет назад

Ответы 1

var n,i: integer; s: real; begin write('vvedite n='); read(n); s:=1; for i:=1 to n do s:=1+1/(1+i); writeln(s); readln; end.
- Автор:
  dingo
- 5 лет назад
- 0
Добавить свой ответ

Еще вопросы

проведите молекулярное и полное ионное уравнение реакции для следующего ионного Mg + 2OH = Mg(OH)2
- Предмет:
  Химия
- Автор:
  lynxhensley
- 5 лет назад
- Ответов:
  
  1
- Смотреть
Как расположены относительно других объектов (равнин, морей, рек и др.) Уральские горы
- Предмет:
  География
- Автор:
  angelldi3
- 5 лет назад
- Ответов:
  
  1
- Смотреть
составить предложения с наречием сословами недовно позавчера сегодня поспешно сейчас завтра рано тихо вчера изредка любопытно осторожно
- Предмет:
  Русский язык
- Автор:
  claudia
- 5 лет назад
- Ответов:
  
  2
- Смотреть
в коробке лежат 5 красных и 5 зелёных карандашей. какое наименьшее число карандашей нужно взять из коробки не глаядя , чтобы среди них оказалось 2 карандаша одного цвета; 2 кранадаша разных цветов?
- Предмет:
  Математика
- Автор:
  commando
- 5 лет назад
- Ответов:
  
  1
- Смотреть

How much to ban the user?

1 hour 1 day 100 years