1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
| ProtasSoft |
Сообщение
#1
|
|
Новичок ![]() Группа: Пользователи Сообщений: 33 Пол: Мужской Репутация: 0 |
Задана большая матрица вещественных чисел размером 1000 на 2000 в текстовом файле.
Необходимо произвести попарную обработку обработку ее строк, т.е. для каждой пары СТРОКАi и СТРОКАj строк необходимо вычислить функцию от элементов этих строк, например, Ain - элементы СТРОКИi и Bjn - элементы СТРОКИj. Из результатов вычисления функции F(Ai1,...,Ai1000;Bj1,...,Bj2000) сформировать новую матрицу и записать в новый файл. Подскажите как мне действовать. Насколько я понимаю с большими массивами Borland Pascal не работает. |
![]() ![]() |
| Malice |
Сообщение
#2
|
![]() Профи ![]() ![]() ![]() ![]() Группа: Пользователи Сообщений: 705 Пол: Мужской Репутация: 20 |
Цитата(ProtasSoft @ 12.08.05 17:18) Насколько я понимаю с большими массивами Borland Pascal не работает. Совсем не обязательно считывать сразу весь массив. Достаточно считать две строки, записать результат и продолжить в том же духе Есть и другие варианты. |
| volvo |
Сообщение
#3
|
|
Гость |
Цитата(Malice @ 12.08.05 19:05) Есть и другие варианты. ... изобретения велосипеда. А зачем? Если на 32-битном компилере задача решается "влет", и нет ограничения на использование этих компиляторов? Тем более, что придется как минимум 2000 раз проходить по файлу (и значительная часть проходов будет "холостыми"), потому как Цитата т.е. для каждой пары СТРОКАi и СТРОКАj строк необходимо вычислить функцию от элементов этих строк . Я бы не заморачивался с построчным чтением... |
| Malice |
Сообщение
#4
|
![]() Профи ![]() ![]() ![]() ![]() Группа: Пользователи Сообщений: 705 Пол: Мужской Репутация: 20 |
Согласен, не подумай, что я против FP, но вдруг это нужно по условию. Если нет, то нет, конечно же.
|
ProtasSoft Обработка прямоугольных матриц 12.08.2005 21:18
kent
Используй динамическую матрицу. 12.08.2005 21:27
volvo
Borland Pascal - нет. Зато Free Pascal прекрасно … 12.08.2005 21:32
ProtasSoft У меня нет Free Pascal. Если поделитесь дистрибути… 12.08.2005 21:51
volvo klem4,
Если бы тебе предложили тот компилятор, ко… 13.08.2005 15:01
volvo Последнюю версию (2.0.0) можно взять на официально… 12.08.2005 22:02
klem4 А вот мое мнение что FPC тут не выход, так как нав… 13.08.2005 14:05
ProtasSoft FPC я скачал и установил.
Вопрос следующий: подск… 15.08.2005 16:08
klem4 Не очень ясен вопрос... могу предположить что тебе… 15.08.2005 16:09
volvo ProtasSoft,
не путай такое (Паскаль не использует … 15.08.2005 19:19
ProtasSoft procedure EnterMatrixFromFile (var Matr: Matrix);
… 15.08.2005 20:32
Malice
j всегда равен 1 ? Поставь j=1 до цикла While. 15.08.2005 20:57
klem4 у тебя файл текстовый и информация в нем записана … 15.08.2005 20:55
klem4 примерно это должно выглядеть вот так :
{$N… 15.08.2005 21:36
volvo klem4, смысл читать содержимое, как строку? Внимат… 15.08.2005 22:44
Malice
iy тоже, имхо, сбрасывать надо.. 15.08.2005 23:38
ProtasSoft Вот этот код работает
program ReadMatrixFromFile;… 16.08.2005 13:25
volvo Да, :rolleyes: тогда iy := 1 между первым и вторы… 15.08.2005 23:48
volvo ProtasSoft, ТОЛЬКО приведенный тобой код работает?… 16.08.2005 13:36
ProtasSoft Если что-то не так сказал прошу прощения.
Далее на… 16.08.2005 14:28
klem4
1) для функции funky не определены размеры прочт… 16.08.2005 14:40
klem4 Я убрал все синтаксические ошибки, и кое-что добав… 16.08.2005 15:29
volvo klem4, как ты думаешь, что будет в массиве Matr по… 16.08.2005 16:52
klem4 Да, это я проглядел :yes: ... ProtasSoft в заголо… 16.08.2005 16:54
ProtasSoft Коллеги, вот что у меня получилось с учетом Ваших … 16.08.2005 19:48
volvo
Насколько я вижу, эта программа и не должна работ… 16.08.2005 20:35
ProtasSoft Изменил , все равно не работает. :unsure: 16.08.2005 20:51
volvo Значит, так... Поменяй следующее:
1. procedure Pr… 16.08.2005 21:05
ProtasSoft Я извиняюсь, вроде заработало. 16.08.2005 21:25
ProtasSoft Коллеги, вот что у меня получилось
program Matrix… 17.08.2005 15:59
ProtasSoft Коллеги, пробовал ниже приведенную программку на м… 18.08.2005 14:52
volvo Заархивируй свой исходник вместе с файлом данных и… 18.08.2005 15:05
volvo ProtasSoft, та программа, которую ты привел, завер… 18.08.2005 15:39
ProtasSoft Огромное спасибо. Заработало!
:flowers:
Сообщ… 18.08.2005 16:18
ProtasSoft Снабдил программу Гаммой-функцией и процедурой инт… 19.08.2005 20:55
volvo Если ты про проблему с компиляцией функции Simps, … 19.08.2005 21:13
ProtasSoft После запуска проги выскакивает системная ошибка.… 19.08.2005 21:34
volvo const
NMAX = 20;
MMAX = 20;
увеличивать не пр… 19.08.2005 21:43
volvo А вот и причина возникающей ошибки (RunTime Error … 19.08.2005 22:08
ProtasSoft Можно это так обойти
function Gamma(x: extended):… 19.08.2005 22:33
klem4 Так к слову : в паскале есть встроенная константа … 19.08.2005 22:46
volvo
:yes: ProtasSoft, ты будешь смеяться, но и функц… 19.08.2005 22:50![]() ![]() |
|
Текстовая версия | 6.11.2025 7:27 |