Перейти из форума на сайт.

НовостиФайловые архивы
ПоискАктивные темыТоп лист
ПравилаКто в on-line?
Вход Забыли пароль? Первый раз на этом сайте? Регистрация
Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » Вопросы программирования на FORTRAN (ФОРТРАН)

Модерирует : ShIvADeSt

 Версия для печати • ПодписатьсяДобавить в закладки
Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215 216 217 218 219 220 221 222 223 224 225 226 227 228 229 230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 251 252 253 254 255 256 257 258 259 260 261 262 263 264 265 266 267 268 269 270 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287 288 289 290 291 292 293 294 295 296 297 298 299 300 301 302 303 304 305 306 307 308 309 310 311 312 313 314 315 316 317 318 319 320 321 322 323 324 325 326 327 328 329

Открыть новую тему     Написать ответ в эту тему

akaGM

Platinum Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Обсуждаются все вопросы, связанные с программированием на ФОРТРАН, как общего так и конкретного характера.
Постарайтесь дать как можно больше информации о возникшей проблеме -- это в конце концов в ваших же интересах чтобы вам помогли...

прежде чем просить помощи в задании
платное решение задач

ресурсы этого топика
ссылка на подборку ресурсов, собранных посетителями этого форума
 
то, чем мы решили поделиться
ссылка на страничку программ etc собственного изготовления, которыми любезно делятся наши форумчане


если вам вдруг не отвечают или ответ вас не устраивает
и вообще полезно прочитать всем спрашивающим
 
просьба к пишущим и отвечающим все большие листинги оформлять тегом more
и отключать графические смайлики при размещении фортран-кода

Всего записей: 24056 | Зарегистр. 06-12-2002 | Отправлено: 18:11 14-01-2007 | Исправлено: akaGM, 09:47 01-03-2020
akaGM

Platinum Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
во, слизать у коллег и все дела:
http://forum.ru-board.com/topic.cgi?forum=33&topic=10477#1

Всего записей: 24056 | Зарегистр. 06-12-2002 | Отправлено: 21:12 07-04-2010
pir0texnik2



Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
я фигею с этого "мертвого" языка фортрана на котором никто не пишет, моя мессага потерялась где-то на предыдущей странице, не прошло и суток!..
амбула.

да, длл моя, писал -traceback и /traceback не помогло. отдельно в ехе писать не хочу. все интерфейсы вылизаны, проверены, глюки именно в математике, деления 0/0....
собсно наверно и фиг с ним, когда я слежу за длл в отладчике, он аккуратно, после вылета за границу, останавличается в проблемном месте.
просто хотелось попользоваться благами IFC раз, судя по таким диагностическим окнам, он может проследить ошибку до строки и процедуры прямо в рантайме. Спасибо за мнения!
 
кстати.. а отладчик делает остановы все-таки не в "проблемных" местах...иногда попадает куда надо, но сейчас, например, все время останавливается(точнее после рантаймного окна с ошибкой, если продолжить, то останов в отладчике будет там) в другой процедуре, которая к ошибке не имеет никакого отношения...

Всего записей: 173 | Зарегистр. 27-02-2008 | Отправлено: 22:00 07-04-2010 | Исправлено: pir0texnik2, 05:26 08-04-2010
Vskazka

Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
pir0texnik2
Еще раз советую, перекомпелируйте на silverfroste. У него очень неплохой отлавливатель ошибок в реальном времени

Всего записей: 382 | Зарегистр. 24-11-2003 | Отправлено: 10:36 08-04-2010
akaGM

Platinum Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
All
я тут подумал...
ну на фиг эти правила, мы их для себя что ли пишем? нас всего-то тут 6-7 человек
ну пришёл халявщик, попросил, ну ответили ему, не ответили -- мир не рухнул и мир не переделать...
аминь
---
единственное что подзаголовок поправил, если вы не возражаете...
 
pir0texnik2

Цитата:
да, длл моя

блин, мы не ищем лёгких путей?
ладно, хозяин -- барин...
кстати, project.exe & dll -- это с дельфями чтоли связка?
если так, то настоятельно советую в таких случаях использовать EurekaLog -- имхо, нет
лучшего тресера ошибок в длл ин RT
 

Цитата:
моя мессага потерялась где-то на предыдущей странице

я больше не буду :)

Всего записей: 24056 | Зарегистр. 06-12-2002 | Отправлено: 13:24 08-04-2010 | Исправлено: akaGM, 13:30 08-04-2010
Andrew10

Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
akaGM

Цитата:
я тут подумал...
ну на фиг эти правила, мы их для себя что ли пишем? нас всего-то тут 6-7 человек
ну пришёл халявщик, попросил, ну ответили ему, не ответили -- мир не рухнул и мир не переделать...
 

Согласен, вполне достаточно того, что сейчас вставлено в заголовок.

Всего записей: 780 | Зарегистр. 26-02-2005 | Отправлено: 16:50 08-04-2010
by Vasilisa

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
program mas 2
use dfport
implisit none
Iinteger (4) A(6,6),i,j,p,s,n
do i=1,6
do j=1,6
A(i,j)=10*rand()
end do
end do
print *,A
p=0
S=A(1,6)
do i=1
do j=1,6
s=0
if (A(n)=A(n+1)) then
n=n+1
end if
 
в каждом столбце целочисленной матрицы А найти кол-во пар рядом стоящих одинаковых элементов.Результаты записать в однородный массив.
и никакая я не халявщица, просто не понимаю как рассмотреть отдельный столбец, а точнее сравнить элементы этого столбца.А ещё ведь нужно зациклить программу для того чтобы не писать это дело для каждого столбца.
поможете?

Всего записей: 4 | Зарегистр. 07-04-2010 | Отправлено: 18:28 08-04-2010
akaGM

Platinum Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
by Vasilisa

Цитата:
и никакая я не халявщица
поможете?

гм...
поможем, если ты ответишь на два простых вопроса:
1. кто тебе писал эту программу?
2. если ты это делала сама, то пыталась ли хоть один раз её скомпилировать?

Всего записей: 24056 | Зарегистр. 06-12-2002 | Отправлено: 19:15 08-04-2010
by Vasilisa

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
это не прграмка,это её часть, я же говорю что не понимаю как рассмотреть отдельный столбец, компилятор 9 ошибок выдаёт

Всего записей: 4 | Зарегистр. 07-04-2010 | Отправлено: 19:41 08-04-2010
FuzzyLogic



Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
если смотреть на массив считая что первый индекс это индекс столбца, то

Код:
 
do i=1,6        ! цикл по столбикам
  do j=1,5      ! цикл для каждого столбика по строкам
    if (A(i,j) .eq. A(i,j+1)) then
      тут что-то там сделать что нужно
    end if
  end do
end do
 

это ответ на ваш вопрос, привести это к общему виду (не 6 на 6) и дописать обёртку, половина которой у вас есть, "нехалявщик" сумеет. Удачи.

Всего записей: 1920 | Зарегистр. 27-07-2002 | Отправлено: 19:50 08-04-2010 | Исправлено: FuzzyLogic, 19:52 08-04-2010
plazmon



Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Эээ, если мне память не изменяет, то номер столбца это второй индекс?!

Всего записей: 107 | Зарегистр. 29-05-2007 | Отправлено: 20:05 08-04-2010
FuzzyLogic



Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
plazmon
А это как смотреть  обычно матрицы организуются так как "удобнее" для вычислений, в зависимости от того в какую сторону у вас должны бегать циклы. Первый индекс массива самый "быстро меняющийся".
Для данной задачи я думаю никто не будет смотреть на оптимизацию, поэтому пусть делает как удобно или "как учили" (учат кстати по-разному, как я заметил).

Всего записей: 1920 | Зарегистр. 27-07-2002 | Отправлено: 20:12 08-04-2010
akaGM

Platinum Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
plazmon
 
FuzzyLogic хотел сказать, что это определяется способом хранения массивов в памяти, по строкам или по столбцам, а в разных
языках это организовано по-разному (Си и Фортране, например)...
 
by Vasilisa
тебе повезло, тебе отвечает сам FuzzyLogic...
можешь рассматривать это как косвенное признание твоей "нехалявности"...
посмотри основы фортрана, самые самые...
тогда не будешь писать, например
do i=1
enddo
 
кстати, ещё вопрос:
где это ты изучаешь фортран, в смысле специальности?
 
FuzzyLogic
:)

Всего записей: 24056 | Зарегистр. 06-12-2002 | Отправлено: 20:26 08-04-2010 | Исправлено: akaGM, 20:32 08-04-2010
plazmon



Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Так исторически сложилось, что в математике первый подстрочный индекс - номар строки, второй - столбца. Прираззработке фортрана, почемуто решили, что быстрее всего должен менятся самый первый индекс, поэтому говорят, что Фортран хранит матрицы по столбцам (в отличие от большинства остальных яззыков).

Всего записей: 107 | Зарегистр. 29-05-2007 | Отправлено: 20:31 08-04-2010 | Исправлено: plazmon, 21:15 08-04-2010
FuzzyLogic



Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
akaGM

 
plazmon
Я приблизительно в курсе как в математике, только непонятно как это пересекается с хранением массивов в памяти  Как я уже сказал, видел кучу "подходов" к обучению Фортрану, хотя имхо учить что "Фортран хранит по столбцам" не есть хорошо, так как фиксирует представление о том как данные представлены в коде. А учитывая что Фортран по идее должны изучать только те кто занимается вычислениями (и для кого подобная оптимизация крайне важна) это особенно нехорошо. Надо показывать что как положите так и будет храниться.
 
По поводу того почему Фортран хранит так, я если честно не знаю. Но, если вы посмотрите на современные стандарты хранения данных, то там такая же фигня. Например, если мне не изменяет память - NetCDF и HDF - индексы наоборот. По идее разницы нет, всё упирается в конвенции, как договорились так и будет. Ладно хоть от середины в обе стороны никто не считает.

Всего записей: 1920 | Зарегистр. 27-07-2002 | Отправлено: 21:02 08-04-2010 | Исправлено: FuzzyLogic, 21:03 08-04-2010
Olga60



BANNED
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

Всего записей: 1 | Зарегистр. 08-04-2010 | Отправлено: 22:56 08-04-2010 | Исправлено: Olga60, 12:55 12-04-2010
FuzzyLogic



Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Мда ... похоже в каком-то ВУЗе прознали про этот топик ...
Olga60
Это тема где задают вопросы о программировании на Фортране, а не просят сделать за них что-то, чувствуете разницу? Сделайте хотя бы что-то может вам и помогут. А вообще - гугл вам в помощь.

Всего записей: 1920 | Зарегистр. 27-07-2002 | Отправлено: 23:03 08-04-2010
akaGM

Platinum Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
FuzzyLogic
причём заметь -- исключительно девушки...
ну или представляются таковыми в расчёте на то, что сердца угрюмых программистов растают...
а кстати, гугль нас чуть ли не в первой десятке ставит, с правильным-то запросом...
 
добавлено
Ха! не поленился, глянь
с простейшим запросом
4-ой ссылкой получил
с точностью до нечётного!!
 
там правда она уже он, как я и предполагал...
надо было в сыщики пойти, в подразделение К, блин...
 
добавлено
кстати, слабенький форум там у конкурентов...
хоть и фортрану выделен не один трейд, а отдельный форум...

Всего записей: 24056 | Зарегистр. 06-12-2002 | Отправлено: 07:26 09-04-2010 | Исправлено: akaGM, 08:41 09-04-2010
FuzzyLogic



Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
akaGM
Гениально, Холмс  А если по делу, то я совсем не против помочь, ещё не так стар чтобы не помнить как был студентом, да и жаден особо не был. Помнится как-то информатику курс сдавал, так в одной аудитории народ экзамен сдавал, а я в соседней им задачи решал. Мне кажется я штук 50 тогда окучил (с 12 дня и почти до 10 вечера сдавали однако  ).
 
Но не люблю когда откровенно врут. Olga, да ещё и неделю думала про задачу ... аж слезы на глаза наворачиваются. Плюс, это когда я учился интернет был роскошью, но сейчас... элементарный запрос в гугле приведёт к искомому ответу, учитывая что задачи эти зачётные повторяются из года в года во всех вузах на всех языках (я точно помню что писал такую задачу про "улитку" когда был студентом, правда на паскале), а посему решений этого дела - миллион и всё в открытом доступе.
 
Плюс ко всему, если учат Фортран, то это явно не факультет кулинарного мастерства (там понятно, можно сказать что оно им не надо, и схалявить), но если дают Фортран то явно что-то физико-математико-инженерное. Если не тянете - идите и учитесь в соответствие со способностями, не занимайте чужие места. Я учился на матфаке, из 90 первокурсников до конца 4го курса (когда я покинул альма-матер) доучилось меньше 50. Надеюсь что преподаватели и сейчас несмотря на бардак в системе образования сохраняют эту традицию и отправляют всех "лишних" искать место более соответствующее их талантам.

Всего записей: 1920 | Зарегистр. 27-07-2002 | Отправлено: 07:52 09-04-2010 | Исправлено: FuzzyLogic, 07:55 09-04-2010
akaGM

Platinum Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
FuzzyLogic
да и я не против помочь, и помогаю, как можно заметить, пусть это и "медвежья услуга"
и тоже всегда интересно: где/кому сейчас фортран дают...
 
у нас вот тоже: приходят аспиранты/дипломники и офигевают, что мы фортраним во всю...
а у меня наготове железо-бетонный аргумент
спрашиваю: ассортимент ПО Intel/NVIDIA знаешь? они дураки, поддерживая Ф? всё...
 
---

Цитата:
По поводу того почему Фортран хранит так, я если честно не знаю

а, забыл тебе сказать касательно порядка хранения массивов в Ф...
такой порядок был связан с оптимизацией линейной выборки из памяти ИБМ-овских мейнстримов тогда, если я правильно помню. типа x86-слово вверх ногами в памяти
короче, заточка под тогдашнее железо...

Всего записей: 24056 | Зарегистр. 06-12-2002 | Отправлено: 08:25 09-04-2010 | Исправлено: akaGM, 13:46 25-10-2011
FuzzyLogic



Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
akaGM

Цитата:
а, забыл тебе сказать касательно порядка хранения массивов в Ф...
такой порядок был связан с оптимизацией линейной выборки из памяти ИБМ-овских мейнстримов тогда, если я правильно помню. типа x86-слово вверх ногами в памяти
короче, заточка под тогдашнее железо...

хмм, возможно, хотя я на это смотрю всё равно как на конвенцию. В том плане что как компилятор интерпретирует выражение это его дело, ведь по идее ничто не мешает дописать пару строк в компиляторе которые будут просто переворачивать индексы в массивах (просто превращать строку a(i,j,k) в a(k,j,i) ) и обрабатывать её как душе угодно хоть в зависимости от архитектуры хоть как.

Всего записей: 1920 | Зарегистр. 27-07-2002 | Отправлено: 09:48 09-04-2010
Открыть новую тему     Написать ответ в эту тему

Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215 216 217 218 219 220 221 222 223 224 225 226 227 228 229 230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 251 252 253 254 255 256 257 258 259 260 261 262 263 264 265 266 267 268 269 270 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287 288 289 290 291 292 293 294 295 296 297 298 299 300 301 302 303 304 305 306 307 308 309 310 311 312 313 314 315 316 317 318 319 320 321 322 323 324 325 326 327 328 329

Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » Вопросы программирования на FORTRAN (ФОРТРАН)


Реклама на форуме Ru.Board.

Powered by Ikonboard "v2.1.7b" © 2000 Ikonboard.com
Modified by Ru.B0ard
© Ru.B0ard 2000-2024

BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC

Рейтинг.ru