Цикл for

@Max3 · Регистрация: 29.12.2009

Author24 — интернет-сервис помощи студентам

Доброго времени суток, подскажите пожалуйста, как решить такую задачку используя цикл for http://www.sharemania.ru/0229790 Заранее благодарен!

Добавлено через 4 минуты
Нужно дать ответ на этот вопрос, иначе мне завтра зачёт не поставят

задание в ффйле, потому что не знаю как такую дробь записать...

@Delphin_KKC · 29.12.2009, 16:48

Pascal

var
 s:double;
 n,i:integer;
begin
write('n=');
readln(n);
s:=n;
for i:=n-1 downto 1 do s:=i+1/s;
s:=1/s;
writeln('s=',s:10:3);
readln;
end.

При n=3 выдаёт ответ s=0,7.
Если я правильно понял задание - то работает 100%.

@Max3 · 29.12.2009, 17:07 **[ТС]**

Спасибо! Вроде верно, я сам до конца задание не понял

Завтра покажу, отпишусь!

@Max3 0 / 0 / 0 Регистрация: 29.12.2009 Сообщений: 24
		1
	Цикл for 29.12.2009, 16:34. Показов 999. Ответов 2 Метки нет (Все метки) Доброго времени суток, подскажите пожалуйста, как решить такую задачку используя цикл for http://www.sharemania.ru/0229790 Заранее благодарен! Добавлено через 4 минуты Нужно дать ответ на этот вопрос, иначе мне завтра зачёт не поставят задание в ффйле, потому что не знаю как такую дробь записать... 0

@Max3 0 / 0 / 0 Регистрация: 29.12.2009 Сообщений: 24
	29.12.2009, 17:07 [ТС]	3
	Спасибо! Вроде верно, я сам до конца задание не понял Завтра покажу, отпишусь! 0

Цикл for

Решение