|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
22.12.2008, 17:17 | #1 |
Пользователь
Регистрация: 03.12.2008
Сообщений: 31
|
Замена значений в массиве, на указанное, одномерные массивы. паскаль
помогите исправить программу. она запускается а вот значений никаких не выдаёт.
Дан массив Х(20). Найти в нем заданный элемент и заменить его значение на другое, запрашиваемое после обнаружения заданного элемента. Если элемент не обнаружен, сообщить о неудачной ошибке и предложить повторить поиск другого элемента. program p1; uses crt; const n=20; var X:array [1..n] of real; i,a,b:integer; begin for i:=1 to n do read(x[i]); write('vvedite element'); readln(a); IF X[a]=x[i] then write('vvedite zameny'); read(x[i]); readln(b); for i:=1 to n do x[a]:=x[b]; if x[a]<>x[i] then begin writeln('neydachno'); end; end. |
22.12.2008, 17:56 | #2 |
В тени
Старожил
Регистрация: 19.12.2008
Сообщений: 5,788
|
Как-то так:
Код:
Вполне очевидно, чтобы что-то понять, необходимо книги читать.
Не нужно плодить бессмысленных тем. Вас Поиск избавит от многих проблем. ___________________________________ ___________________________________ _______ [=Правила форума=]_____[Поиск]_____[Литература по С++]____[Литература. Паскаль] |
22.12.2008, 18:47 | #3 |
Пользователь
Регистрация: 03.12.2008
Сообщений: 31
|
можно ли избавиться от флага в программе? слишком сложно для первого курса.
|
22.12.2008, 19:11 | #4 | |
В тени
Старожил
Регистрация: 19.12.2008
Сообщений: 5,788
|
Цитата:
Или флаг совсем убрать надо?
Вполне очевидно, чтобы что-то понять, необходимо книги читать.
Не нужно плодить бессмысленных тем. Вас Поиск избавит от многих проблем. ___________________________________ ___________________________________ _______ [=Правила форума=]_____[Поиск]_____[Литература по С++]____[Литература. Паскаль] |
|
22.12.2008, 19:15 | #5 |
В тени
Старожил
Регистрация: 19.12.2008
Сообщений: 5,788
|
Вот:
Код:
Вполне очевидно, чтобы что-то понять, необходимо книги читать.
Не нужно плодить бессмысленных тем. Вас Поиск избавит от многих проблем. ___________________________________ ___________________________________ _______ [=Правила форума=]_____[Поиск]_____[Литература по С++]____[Литература. Паскаль] |
22.12.2008, 19:18 | #6 |
Пользователь
Регистрация: 03.12.2008
Сообщений: 31
|
Н А Д О !!!
|
22.12.2008, 19:27 | #7 |
В тени
Старожил
Регистрация: 19.12.2008
Сообщений: 5,788
|
Кирилл17 Смотрите предыдущий пост. Совсем без флага не получится. Если кто-нибудь сделает без него (и без чего-то подобного), то мне будет самому интересно посмотреть.
PS: В вашем варианте, хоть он и неправильный, тоже присутствует флаг (X[a]). Так что не вижу проблемы.
Вполне очевидно, чтобы что-то понять, необходимо книги читать.
Не нужно плодить бессмысленных тем. Вас Поиск избавит от многих проблем. ___________________________________ ___________________________________ _______ [=Правила форума=]_____[Поиск]_____[Литература по С++]____[Литература. Паскаль] |
22.12.2008, 19:37 | #8 |
Пользователь
Регистрация: 03.12.2008
Сообщений: 31
|
я не понимаю что такое флаг. нам его давали на самостоятельное обучение. я нигде не нашел информации про него.теперь мучаюсь.
как тогда с помощью флага решить эту задачу:дано 100 вещественных чисел. опреденить образуют ли они возрастающую последовательность. какой наиболее понятный учебник по паскалю. у нас в институте нет никаких учебников. всю информацию берем либо из лекций либо из дополнительниных источников |
22.12.2008, 19:49 | #9 |
Пользователь
Регистрация: 09.04.2008
Сообщений: 10
|
А он должен чё-то делать после замены или должен сразу закрывать? Если закрывать, то вот:
Код:
|
22.12.2008, 19:53 | #10 | |
В тени
Старожил
Регистрация: 19.12.2008
Сообщений: 5,788
|
Цитата:
Код:
Вполне очевидно, чтобы что-то понять, необходимо книги читать.
Не нужно плодить бессмысленных тем. Вас Поиск избавит от многих проблем. ___________________________________ ___________________________________ _______ [=Правила форума=]_____[Поиск]_____[Литература по С++]____[Литература. Паскаль] |
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Даны одномерные массивы А и В. Сформировать массивы, состоящие из элемент | LyaLya | Помощь студентам | 15 | 20.12.2009 14:12 |
Pascal. Одномерные массивы разрешенных и неразрешенных значений. | FatCat | Помощь студентам | 2 | 05.12.2008 11:39 |
Паскаль...Файлы, Одномерные массивы | Extrem_um | Помощь студентам | 10 | 12.04.2008 18:21 |
Паскаль. Массивы. Замена элементов | Stelix | Помощь студентам | 2 | 06.11.2007 17:20 |