IPB
ЛогинПароль:

> Прочтите прежде чем задавать вопрос!

1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!

> итерационный цикл
-олег-
сообщение 9.01.2007 19:43
Сообщение #1


Гость






помогите найти ошибку
Код

program c;
var N:integer; YN,YN1,YN2,e:real;
begin
writeln('vvedite e');
readln (e);
YN:=YN1;YN1:=YN2;
N:=1;
repeat
N:=N+1;YN:=0.352*YN1+ cos(1.57 + YN2)
until ABS (YN - YN1)<E;
writeln ('predel ',YN:12:8)
end.
 К началу страницы 
+ Ответить 

Сообщений в этой теме
-олег-   итерационный цикл   9.01.2007 19:43
мисс_граффити   YN:=YN1; а чему равно YN1?   9.01.2007 19:47
Гость   YN:=Y(n-1); это вписать?   9.01.2007 19:55
мисс_граффити   еще б знать, что такое Y и что должна делать прогр...   9.01.2007 20:05
Гость   program c; var N:integer; Y,YN,YN1,YN2,e...   9.01.2007 20:23
мисс_граффити   ну естественно!!! вот в этом месте чем...   9.01.2007 21:21
Гость   program c; var N:integer; Y,YN,YN1,YN2,e...   9.01.2007 21:43
Malice   Сдается мне ты вот такое хотел изобразить: program...   9.01.2007 23:27
Archon   :lol: Извини, но приведи задание, а?   9.01.2007 23:29
Гость   задание привел надо выщитать предел YN:=0.352*YN1...   9.01.2007 23:50
Гость   program c; var N:integer; Y,YN,YN1,YN2,e:r...   9.01.2007 23:56
мисс_граффити   :blink: это какой-то вычислительный рекурсивный м...   10.01.2007 0:03
Гость   ээээ вводиш разные е результат разный или так долж...   10.01.2007 0:06
Гость   результат одинаковый всмысле   10.01.2007 0:07
Archon   E - это точность. Чем меньше E, тем результат точн...   10.01.2007 0:13
Гость   так чо с самого начало моя прога выдавала првильны...   10.01.2007 0:15
Archon   Нет. С самого начала твоя прога вязла в бесконечно...   10.01.2007 0:23
Гость   program c; var N:integer; Y,YN,YN1,YN2,e:r...   10.01.2007 0:32
Гость   ктонить знает как посчитать глубину рекуретной фор...   10.01.2007 16:59
Гость   обясните хоть что такое глубина рекурентной формул...   10.01.2007 17:54


 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 



- Текстовая версия 19.07.2025 14:58
Хостинг предоставлен компанией "Веб Сервис Центр" при поддержке компании "ДокЛаб"