Программа на циклы |
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
Программа на циклы |
nik89 |
29.05.2007 9:59
Сообщение
#1
|
|||
Группа: Пользователи Сообщений: 4 Пол: Мужской Репутация: 0 |
Вот задача.Найти наименьший номер элемента последовательности,для которого выполняется условие M.Вывести на экран этот номер и все элементы a[i],где i=1,2,...n. a[n]=1/2(a[n-1]+2/a[n-1]),a[1]=1,M:модуль(a[n]*a[n]-2)<E.Ввод E с клавиатуры. Вот я что то написал,но она работает не так.Помогите. program cikl; Сообщение отредактировано: klem4 - 31.05.2007 8:42 |
|||
Ozzя |
29.05.2007 10:04
Сообщение
#2
|
Гуру Группа: Пользователи Сообщений: 1 220 Пол: Мужской Репутация: 16 |
While ABS(a[n]*a[n]-2)<E Do До этого цикла НЕ устанавливаешь n. Оно может быть равно чему угодно, например 10000 |
nik89 |
30.05.2007 21:03
Сообщение
#3
|
Группа: Пользователи Сообщений: 4 Пол: Мужской Репутация: 0 |
т.е. после a[1]:=1, For n:=2 to 10000 do не писать.Или я не так понял
|
Ozzя |
31.05.2007 8:10
Сообщение
#4
|
Гуру Группа: Пользователи Сообщений: 1 220 Пол: Мужской Репутация: 16 |
For n:=2 to 10000 do |
nik89 |
31.05.2007 9:56
Сообщение
#5
|
Группа: Пользователи Сообщений: 4 Пол: Мужской Репутация: 0 |
Когда ввожу любое число(когда ввожу 2 то появляется одно значение) у меня выводит только 3 результата.Причём одно значение выводится раз 15, и наименьший номер элемента последовательности не выводится.Я походу вообще не так сделал и не так понял задание.Помогите.
Сообщение отредактировано: nik89 - 31.05.2007 9:57 |
Гость |
1.06.2007 18:25
Сообщение
#6
|
Гость |
И ещё в цикле While условие должно быть другое.Помогите
|
Текстовая версия | 29.04.2024 6:45 |