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

> Прочтите прежде чем задавать вопрос!

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

> Работа с матрицами и файлами, Помогите написать две программы.
Iren
сообщение 27.11.2005 10:06
Сообщение #1


Гость






Надо к завтрашнему дню сдать две задачи (крайний срок), сама виновата, дотянула донельзя.
Очень прошу, помогите решить:
1.
Описать функцию sum(A, S1, S2), вычисляющую сумму тех элементов матрицы А, номера строк и столбцов которых принадлежат соответственно непустым множествам S1 и S2 типа ном.
const n=10; type номер=1..n; матрица=array [номер, номер] of real; ном = set of номер
2.
В данном файле целых чисел с элементами A1, A2, …, AN (N — количество элементов в файле). Заменить исходное расположение его элементов на следующее: A1, AN, A2, AN–1, A3, … .

Очень прошу помогите...
 К началу страницы 
+ Ответить 
 
 Ответить  Открыть новую тему 
Ответов
Iren
сообщение 27.11.2005 14:11
Сообщение #2


Гость






ГИГАНТСКОЕ Вам спасибо To: volvo , вторую программу я еще не смотрела, а вот по первой возникло несколько вопросов:
1. На экран у меня почему-то выводятся две абсолютно одинаковые матрицы.
2. Наверное лучше сделать ввод матрицы вручную (тоесть убрать RANDOM), но как это сделать. Или оставить ввод случайных чисел
 К началу страницы 
+ Ответить 

Сообщений в этой теме
Iren   Работа с матрицами и файлами   27.11.2005 10:06
volvo   Насчет первой - все просто: const size = 10; typ...   27.11.2005 10:46
volvo   Вторая (предполагая, что файл F: File Of Integer у...   27.11.2005 10:47
Iren   ГИГАНТСКОЕ Вам спасибо To: volvo , вторую программ...   27.11.2005 14:11
volvo   :blink: Откуда выводятся 2 матрицы? Там же тольк...   27.11.2005 14:20
Iren   Извините, но ведь в задаче сказано матрица=array [...   27.11.2005 15:34
volvo   Iren, извините, а что, так трудно поменять? Или Вы...   27.11.2005 15:48
Guest   Да нет, вы меня неправильно поняли, извините если ...   27.11.2005 16:28
volvo   :no1: Никаких ошибок. Надо было просто изменить ти...   27.11.2005 16:32
Iren   Еще раз спасибо Вам большое за помощь ...   27.11.2005 17:17
Iren   С первой задачкой все супер, большое вам спасибо.....   29.11.2005 12:05
klem4   приведи пожалуйста текст того, то ты запускаешь, +...   29.11.2005 12:14
volvo   :no1: Для этого достаточно сделать так: Assign(f...   29.11.2005 13:28
Guest   Вставила, но получается просто пустой файл создает...   29.11.2005 14:13
Iren   Вставила, но получается просто пустой файл создает...   29.11.2005 14:13
Iren   var  arr: array[1 .. 100] of i...   29.11.2005 14:17
volvo   Ozzя, я для кого написал в комментариях { именно 1...   29.11.2005 14:54
volvo   Iren, все прекрасно работает... Какой "пустой...   29.11.2005 15:00
Iren   А как это реализовать: надо что-то добавить в эту...   29.11.2005 15:43
Iren   И еще: как я поняла данная программа создает новый...   29.11.2005 15:59
volvo   Можно добавить: reset(f); while not eof(f) do begi...   29.11.2005 16:01
Guest   Я все поняла, БОЛЬШОЕ спасибо :kiss2:   29.11.2005 17:36
Iren   :cray: Не правильно у меня сделана сказали вторая...   8.12.2005 12:03
Guest   Ну хотя бы намекните, что надо сделать...   8.12.2005 14:19
Iren   Вот попыталась переделать, не знаю правильно ли (в...   11.12.2005 15:10


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

 



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