Дано естественное n. Вычислить2/1+3/2+4/3+...+n+1/n. ПОМОГИТЕ!!!

Дано естественное n. Вычислить
2/1+3/2+4/3+...+n+1/n. ПОМОГИТЕ!!!

Задать свой вопрос
1 ответ

program summa;

var

s:real;

i, n : integer;

begin

writeln('Введите число n= ');

read(n);

s:=0;

for i:=1 to n do  

 s:=s+(i+1)/i;

writeln('Сумма: ',s:4:2);

end.

, оставишь ответ?
Имя:*
E-Mail:


Последние вопросы

Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт