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

> Правила раздела!

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

3 страниц V < 1 2 3 >  
 Ответить  Открыть новую тему 
> цикл For, не врубаюсь
suriv
сообщение 27.10.2004 19:21
Сообщение #21


Бывалый
***

Группа: Пользователи
Сообщений: 234
Пол: Мужской
Реальное имя: AHTOH

Репутация: -  1  +


Цитата
А это, по-моему, то же самое, что и 1), только число другое

Ой блин ща исправлю!

Код
program k;
var
m:array[1..100]of integer;
i:byte;
begin
randomize;
for i:=1 to 6 do
m[i]:=random(400);
write(m[i]);
readln;
end.


1.ВСЕМ ШЕСТИэлементам массива присваевается одно и то же случайное
число?Например если случайное число равно 8:
1элемент:=8
2элемент:=8
3элемент:=8
4элемент:=8
5элемент:=8
6элемент:=8
ИЛИ
2.Каждому елементу (их 6) присваевается разное случайное число?
Например:
1элемент:=5
2элемент:=3
3элемент:=48
и т.д до шестого элемента

надеюсь вопрос понятен.


--------------------
Хочу в репу !

Cмотри,а то ведь получишь!
Админ.

Не получит - его фиг догонишь!
Админ №2.

P.S Вы еще третьего админа притащите сюда :D
ваш аффтар :D
Звали? :D (админ № не помню какой)

ха больше нифига не напишете
афтар

Уверен? (Moderator)
А еще можно ? (супмодер)
Хватит его мучать ! Избили уж... (админ)
Не хватит. я тоже напишу (тоже Админ)
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
volvo
сообщение 27.10.2004 19:52
Сообщение #22


Гость






тут у тебя КАЖДОМУ элементу присваивается НОВОЕ случайное число...

А если ты хочешь то же самое число во всех элементах массива -

Код

program k;
var
m:array[1..100]of integer;
i:byte;
elem: integer;
begin
randomize;
elem := random(400);
for i:=1 to 6 do
begin
 m[i]:=elem;
 write(m[i]);
end;
readln;
end.


Сообщение отредактировано: volvo - 27.10.2004 19:54
 К началу страницы 
+ Ответить 
Altair
сообщение 27.10.2004 19:52
Сообщение #23


Ищущий истину
******

Группа: Модераторы
Сообщений: 4 824
Пол: Мужской
Реальное имя: Олег

Репутация: -  45  +


Цитата
надеюсь вопрос понятен.

Нет
Цитата
ВСЕМ ШЕСТИэлементам массива присваевается одно и то же случайное
число?

ну сначала надо определить случайное число (random(X))
затем использовать цикл FOR для присвоения.
Хотя любой цикл можно заменить на другой.


--------------------
Помогая друг другу, мы справимся с любыми трудностями!
"Не опускать крылья!" (С)
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
Digitalator
сообщение 27.10.2004 23:31
Сообщение #24


Бывалый
***

Группа: Пользователи
Сообщений: 247
Пол: Мужской

Репутация: -  1  +


Цитата(Atos @ 27.10.04 18:49)
Вообще-то на самом деле в памяти, выделяемой компилятором под массив  как правило, действительно нули, но это не гарантировано  smile.gif


В паскале (TP, BP, BPW, Delphi) все переменные var обнуляются. Поэтому нет необходимости обнулять что-либо внутри программы перед использованием. В памяти выделяемой под массив, как правило храниться все что угодно кроме нулей. Паскаль разрабатывался как язык для обучения (в отличии от Си), поэтому он наиболее строг в отношении синтаксиса, и максимально структурирован во избежании возможных багов, возникающих у молодых програмистов, казалось бы, на пустом месте.

А вообще можно посоветовать только купить книжку и внимательно ее прочитать. Разговор типа "А тут что делается? а тут? а как это сделать?" заводит в тупик, т.к. имхо не приобретаються конкретные знания и конструкции языка, а некие шаблоны-стереотипы, которые мешают дальнейшему освоению. Программа c циклмаи и условиями сложна для человека, не знающего что такое оператор.

Сообщение отредактировано: Digitalator - 27.10.2004 23:33


--------------------
In byte we trust
ICQ World.ru
mail[dog]digitalator[dot]com
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
GoodWind
сообщение 28.10.2004 3:59
Сообщение #25


Автооответчик
*****

Группа: Модераторы
Сообщений: 1 188
Пол: Мужской
Реальное имя: Александр

Репутация: -  16  +


Цитата
Разговор типа "А тут что делается? а тут? а как это сделать?"

в принципе согласен, но тут несколько иная ситуация: человек дает кусок кода и вполне можно объяснить ему где у него не правильно

Suriv, не забывай тело цикла засовывать в Begin/end; !!!!


--------------------
Неадекватная чушь может быть адекватным ответом на неадекватный вопрос. Понятно или разжевать?
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
Altair
сообщение 28.10.2004 6:32
Сообщение #26


Ищущий истину
******

Группа: Модераторы
Сообщений: 4 824
Пол: Мужской
Реальное имя: Олег

Репутация: -  45  +


Цитата
все переменные var обнуляются

А вот и не все, а вот и не все! smile.gif))
По вашему строки тоже обнуляются?? :D
Виг вам smile.gif ;)
Обнуляется только нулевой элемент - длинна!
Опять же, динамические переменные не обнуляются, необнуляются указатели, и еще некоторые переменные....

Так что неговори гоп, пока не проверил smile.gif


--------------------
Помогая друг другу, мы справимся с любыми трудностями!
"Не опускать крылья!" (С)
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
Digitalator
сообщение 28.10.2004 21:00
Сообщение #27


Бывалый
***

Группа: Пользователи
Сообщений: 247
Пол: Мужской

Репутация: -  1  +


Цитата
Обнуляется только нулевой элемент - длинна!

Ну не надо придираться к словам - нулевой байт обнуляется, т.е. длина строки обнуляется и этого хватает, т.к. корпорация Borland не рекомендует явно изменять(увеличивать) длину строки, во избежание возможных ошибок. При работе со строковыми функциями все получается как надо. Указатели тоже обнуляются - устанавливаются в nil. Насчет дин. переменных - они создаются во время исполнения и обнулять там нечего. ну вы еще приплетите сюда объекты или еще чего похуже smile.gif в псакале переменные обнуляются - это сказано корпорацией borland, это проверено и с этим никто не спорит.

Цитата
можно объяснить ему где у него не правильно

Тут вспомню фразу одного програмиста, на вопрос "Что здесь неправильно?" - "Здесь все правильно, для кода который написан". чел должен сам понимать что, где, а главное почеу надо писать, а не спрашивать по каждой строчке. Мы здесь видим типичного "начинающего програмиста", который неправильно начал - если не наставить его на путь истинный, ничего путного из этого не выйдет (хотя б купить и почитать книжку, не пропуская "неинтересные" первые 50 страниц, и последующие 100 т.к. "а я это уже знаю")

Сообщение отредактировано: Digitalator - 28.10.2004 21:05


--------------------
In byte we trust
ICQ World.ru
mail[dog]digitalator[dot]com
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
suriv
сообщение 28.10.2004 21:23
Сообщение #28


Бывалый
***

Группа: Пользователи
Сообщений: 234
Пол: Мужской
Реальное имя: AHTOH

Репутация: -  1  +


Цитата
хотя б купить и почитать книжку

Какую посоветуешь.В нете есть нормальные е-книги для начинающих или статейки, как на этом сайте?


--------------------
Хочу в репу !

Cмотри,а то ведь получишь!
Админ.

Не получит - его фиг догонишь!
Админ №2.

P.S Вы еще третьего админа притащите сюда :D
ваш аффтар :D
Звали? :D (админ № не помню какой)

ха больше нифига не напишете
афтар

Уверен? (Moderator)
А еще можно ? (супмодер)
Хватит его мучать ! Избили уж... (админ)
Не хватит. я тоже напишу (тоже Админ)
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
suriv
сообщение 28.10.2004 21:30
Сообщение #29


Бывалый
***

Группа: Пользователи
Сообщений: 234
Пол: Мужской
Реальное имя: AHTOH

Репутация: -  1  +


Цитата
видим типичного "начинающего програмиста"

Ну как же:
Вы здесь видите человека который сел за паскаль несколько дней назад. <_<
(и который почти нихрена не понимает.почти нихрена.Единственное по чему я пока занимаюсь так это по "урокам" этого сайта(самое простое))

Сообщение отредактировано: suriv - 28.10.2004 21:32


--------------------
Хочу в репу !

Cмотри,а то ведь получишь!
Админ.

Не получит - его фиг догонишь!
Админ №2.

P.S Вы еще третьего админа притащите сюда :D
ваш аффтар :D
Звали? :D (админ № не помню какой)

ха больше нифига не напишете
афтар

Уверен? (Moderator)
А еще можно ? (супмодер)
Хватит его мучать ! Избили уж... (админ)
Не хватит. я тоже напишу (тоже Админ)
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
Digitalator
сообщение 28.10.2004 21:31
Сообщение #30


Бывалый
***

Группа: Пользователи
Сообщений: 247
Пол: Мужской

Репутация: -  1  +


Лучше купи бумажную, чем с компа читать.
К сожалению не могу подсказать никаких книжек по пасу, т.к. уже давно на нем ничего не пишу - в основном на си. Но одно знаю точно - если на книжке написано что-нить вроде "Для студентов и преподователей высших учебных заведений" и/или "Рекомендовано Министерством образования РФ", то она не может быть плохой. По паскалю в любом магазине можно найти подобную книжку. И ни в коем случае не покупай из серии "Для чайников" или что-то в этом роже :no:

Цитата
и который почти нихрена не понимает.почти нихрена

Это как раз-таки убеждение начинающий програмистов, что я только начал и т.д. и т.п. На самом деле мы либо понимаем, то что пишем, либо нет - "почти" не бывает. Если ты не понимаешь, что пишешь, следовательно нехватает теор. знаний, а это главное в програмировании на любом языке. На самом деле нет принципиальной разници между языками - они все в принципе одинаковы, и поняв, прочувствов это вы сможете осваивать новые языки за пару дней!

Сообщение отредактировано: Digitalator - 28.10.2004 21:37


--------------------
In byte we trust
ICQ World.ru
mail[dog]digitalator[dot]com
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
suriv
сообщение 28.10.2004 21:39
Сообщение #31


Бывалый
***

Группа: Пользователи
Сообщений: 234
Пол: Мужской
Реальное имя: AHTOH

Репутация: -  1  +


Цитата
И ни в коем случае не покупай из серии "Для чайников" или что-то в этом роже

А я бы и не взял-я ж не чайник lol.gif .Тем более там небось про то как открывать или создавать новый файл в паскале, писали бы страниц на 10 lol.gif :D




З.Ы Ну может вспомнишь где в нете есть статьи,книги или уроки :p2:

Сообщение отредактировано: suriv - 28.10.2004 21:42


--------------------
Хочу в репу !

Cмотри,а то ведь получишь!
Админ.

Не получит - его фиг догонишь!
Админ №2.

P.S Вы еще третьего админа притащите сюда :D
ваш аффтар :D
Звали? :D (админ № не помню какой)

ха больше нифига не напишете
афтар

Уверен? (Moderator)
А еще можно ? (супмодер)
Хватит его мучать ! Избили уж... (админ)
Не хватит. я тоже напишу (тоже Админ)
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
Digitalator
сообщение 28.10.2004 21:44
Сообщение #32


Бывалый
***

Группа: Пользователи
Сообщений: 247
Пол: Мужской

Репутация: -  1  +


Цитата
писали бы страниц на 10

Еще одно убеждение начинающих програмистов smile.gif.
На самом деле мне самому было бы интересно почитать об работе с файлами страниц 10 полезной информации. (именно полезной) - а лучше еще больше :P


--------------------
In byte we trust
ICQ World.ru
mail[dog]digitalator[dot]com
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
Digitalator
сообщение 28.10.2004 21:48
Сообщение #33


Бывалый
***

Группа: Пользователи
Сообщений: 247
Пол: Мужской

Репутация: -  1  +


Я где-то видел книжку по TP7 для ВТУЗов, в твердой обложке и с тоненькими желтенькими страничками... к сожалению не помню ни автора ни издательстава... постараюсь заврта посмотреть... :yes:


--------------------
In byte we trust
ICQ World.ru
mail[dog]digitalator[dot]com
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
suriv
сообщение 28.10.2004 21:52
Сообщение #34


Бывалый
***

Группа: Пользователи
Сообщений: 234
Пол: Мужской
Реальное имя: AHTOH

Репутация: -  1  +


Ну в нете можешь найти то о чем я тебя попросил:
e-books там,статьи или что-то наподобе уроков как на этотм сайте.




ЗЫ(бесплатное)

Сообщение отредактировано: suriv - 28.10.2004 21:53


--------------------
Хочу в репу !

Cмотри,а то ведь получишь!
Админ.

Не получит - его фиг догонишь!
Админ №2.

P.S Вы еще третьего админа притащите сюда :D
ваш аффтар :D
Звали? :D (админ № не помню какой)

ха больше нифига не напишете
афтар

Уверен? (Moderator)
А еще можно ? (супмодер)
Хватит его мучать ! Избили уж... (админ)
Не хватит. я тоже напишу (тоже Админ)
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
Digitalator
сообщение 28.10.2004 22:20
Сообщение #35


Бывалый
***

Группа: Пользователи
Сообщений: 247
Пол: Мужской

Репутация: -  1  +


Я не уверен, но кажись эта:
=%39%38&wares[n_id]=%32%31%31%33%30]http://books.m35.ru/index.php?subpart=2&wa...%32%31%31%33%30


--------------------
In byte we trust
ICQ World.ru
mail[dog]digitalator[dot]com
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
suriv
сообщение 28.10.2004 22:43
Сообщение #36


Бывалый
***

Группа: Пользователи
Сообщений: 234
Пол: Мужской
Реальное имя: AHTOH

Репутация: -  1  +


А бесплатного ничего нет? <_<


--------------------
Хочу в репу !

Cмотри,а то ведь получишь!
Админ.

Не получит - его фиг догонишь!
Админ №2.

P.S Вы еще третьего админа притащите сюда :D
ваш аффтар :D
Звали? :D (админ № не помню какой)

ха больше нифига не напишете
афтар

Уверен? (Moderator)
А еще можно ? (супмодер)
Хватит его мучать ! Избили уж... (админ)
Не хватит. я тоже напишу (тоже Админ)
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
Digitalator
сообщение 28.10.2004 23:01
Сообщение #37


Бывалый
***

Группа: Пользователи
Сообщений: 247
Пол: Мужской

Репутация: -  1  +


Ты хочешь научится програмировать или что? Если певрое, тотебе нужна качественная литература, чтоб была всегда под рукой - бесплатная вещь есть, называется help, если денег жалко читай его, но не факт что поймешь


--------------------
In byte we trust
ICQ World.ru
mail[dog]digitalator[dot]com
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
suriv
сообщение 29.10.2004 12:48
Сообщение #38


Бывалый
***

Группа: Пользователи
Сообщений: 234
Пол: Мужской
Реальное имя: AHTOH

Репутация: -  1  +


Блин в нашем городе практически нет не одного книжного магазина:
Но всё таки вмагазике нашел одну книгу(жалко что не фаронов) Ян Гордон.
Ну пришлось купить.(Всё же лучше чем ничего).

=Вот нашел в нете описание этой книги:Описание этой книги

Сообщение отредактировано: suriv - 29.10.2004 12:54


--------------------
Хочу в репу !

Cмотри,а то ведь получишь!
Админ.

Не получит - его фиг догонишь!
Админ №2.

P.S Вы еще третьего админа притащите сюда :D
ваш аффтар :D
Звали? :D (админ № не помню какой)

ха больше нифига не напишете
афтар

Уверен? (Moderator)
А еще можно ? (супмодер)
Хватит его мучать ! Избили уж... (админ)
Не хватит. я тоже напишу (тоже Админ)
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
Флогримм
сообщение 29.10.2004 14:32
Сообщение #39


Бывалый
***

Группа: Пользователи
Сообщений: 253
Пол: Мужской

Репутация: -  4  +


Цитата
моя первая прога -


Код 
uses crt;
begin
write('Hello World!');
end.


а зачем crt ? huh.gif


--------------------
Я не буду жить с этой злобой внутри / Я не буду частью смертельной цепи / Я не буду потребителем твоих идей / Я не буду никогда убивать зверей (Unconform)
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
Флогримм
сообщение 29.10.2004 14:45
Сообщение #40


Бывалый
***

Группа: Пользователи
Сообщений: 253
Пол: Мужской

Репутация: -  4  +


б-р-р-рр что-то свосем непойму; по-моему в нете больше чем достаточно литературы по программированию! поищи хотя на родном сайте форума;
попробуй вот это:
http://pascal.dax.ru/files/books/lecpas.zip
или вот это
http://www.programmerz.narod.ru/books/shenn.rar

должно подойти

Цитата
Ты хочешь научится програмировать или что? Если певрое, тотебе нужна качественная литература, чтоб была всегда под рукой - бесплатная вещь есть, называется help, если денег жалко читай его, но не факт что поймешь


стопудово согласен, тык что мой совет, по ссылке http://pascal.dax.ru/files/books/tp7hlp_r.zip качай русский хелп на паскаль, если какая функция непонятна, наводи на нее курсор и жми ctrl+F1
вот так


--------------------
Я не буду жить с этой злобой внутри / Я не буду частью смертельной цепи / Я не буду потребителем твоих идей / Я не буду никогда убивать зверей (Unconform)
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

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

 



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