|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
14.12.2011, 19:14 | #1 |
Пользователь
Регистрация: 05.12.2011
Сообщений: 11
|
нужно убрать массив
помогите убрать массив, его нужно убрать, но программа не должна измениться по сути дела
uses crt; var a: array[1..100] of real; i,n: integer; Begin clrscr; write('a[1]: '); readln(a[1]); write('a[2]: '); readln(a[2]); write('a[3]: '); readln(a[3]); write('n: '); readln(n); for i:=4 to n do a[i]:=(a[i-1] + 1)/(a[i-2] + 2) * (a[i-3] + 3); for i:=1 to n do write(a[i]:4:2,' '); readln; End. |
14.12.2011, 19:24 | #2 | |
Форумчанин
Регистрация: 30.10.2010
Сообщений: 524
|
Цитата:
Последний раз редактировалось Delphi_ProGer; 14.12.2011 в 19:29. |
|
14.12.2011, 19:42 | #3 |
a.k.a. Skull
Форумчанин
Регистрация: 17.11.2009
Сообщений: 963
|
Видимо да, так как потом берутся a[i-1], a[i-2] и a[i-3]
Если убрать массив, то придется вручную перелопачивать все входные данные, циклы тут не помогут. Danil_59, если не секрет, чем тебе массив неугодил?
Все тривиальное просто
|
14.12.2011, 19:51 | #4 |
Форумчанин
Регистрация: 30.10.2010
Сообщений: 524
|
ну во-первых, программа с ошибкой, т.к. будет выводить не тот елемент массива!
во-вторых, вот пример: что она должна делать???? |
14.12.2011, 20:32 | #5 |
Пользователь
Регистрация: 05.12.2011
Сообщений: 11
|
whatever,да меня то он всем угодил, незнаю зачем просят без него) [/QUOTE]
|
14.12.2011, 20:38 | #6 |
Пользователь
Регистрация: 05.12.2011
Сообщений: 11
|
Построить n элементов последовательности и проверить, является ли она монотонно неубывающей или строго возрастающей. вот задание
|
20.12.2011, 13:44 | #7 |
Пользователь
Регистрация: 05.12.2011
Сообщений: 11
|
помогите кто нибудь?
|
20.12.2011, 16:24 | #8 | |
Made In USSR!
Старожил
Регистрация: 01.09.2010
Сообщений: 3,657
|
Цитата:
Код:
"...В жизни я встречал друзей и врагов.В жизни много всего перевидал.Солнце тело мое жгло, ветер волосы трепал,но я смысла жизни так и не узнал..."
(c) Юрий Клинских aka "Хой" |
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
нужно убрать ссылку из google | arni miller | Свободное общение | 8 | 15.11.2011 07:31 |
Нужно убрать лишнее!!! | Less1 | Помощь студентам | 10 | 26.06.2011 19:15 |
Массив - Нужно написать массив и распечатать на экран с конца в начало(язык С++) | econ | Помощь студентам | 1 | 29.05.2011 22:02 |
Нужно убрать белую полоску на странице | Kinash | HTML и CSS | 7 | 31.05.2010 09:57 |
Убрать не нужно в виндоусе | prikolist | Windows | 7 | 13.07.2009 21:05 |