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

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

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

 
 Ответить  Открыть новую тему 
> Паскаль матрицы
сообщение
Сообщение #1


Гость






Привет, помогите студентки, не понимаю как решать
1)В данной вещественной матрице размером 6 на 9 поменяйте местами строку, содержащую элемент с наибольшим значением, со строкой, содержащей элемент с наименьшим значением. Предполагая, что эти элементы единственные.

2) пусть дано натуральное число n и целочисленная квадратная матрица порядка n. Получите b1,…,bn, где bi – это:
А)значение первого по порядку положительного элемента i-й строки (если таких нет, то принять bi=1)
Б) сумма элементов, расположенных за первым отрицательным элементом в i-й строки (если все строки неотрицательные, то принять bi=100)
С)сумма элементов, предшествующих последнему отрицательному элементу i-й строки (если все элементы строки неотрицательны, то принять bi=-1)

Но вот такая я непонимающая, помогиттте-е-е wacko.gif
 К началу страницы 
+ Ответить 
сообщение
Сообщение #2


просто человек
******

Группа: Пользователи
Сообщений: 3 641
Пол: Женский
Реальное имя: Юлия

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


что пробовала делать?
с чем (конкретно, а не "с задачами") возникли проблемы?


--------------------
Все содержимое данного сообщения (кроме цитат) является моим личным скромным мнением и на статус истины в высшей инстанции не претендует.
На вопросы по программированию, физике, математике и т.д. в аське и личке не отвечаю. Даже "один-единственный раз" в виде исключения!
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #3


Гость






Цитата(мисс_граффити @ 20.02.2008 16:31) *

что пробовала делать?
с чем (конкретно, а не "с задачами") возникли проблемы?


1)В данной вещественной матрице размером 6 на 9 поменяйте местами строку, содержащую элемент с наибольшим значением, со строкой, содержащей элемент с наименьшим значением. Предполагая, что эти элементы единственные.

Как понимаю,


For i:=1 to 9 do
For j:=1 to 6 do read(a[I, j];
{посчитать сумму каждой строки}
Sum:=0;
For i:=1 to 9 do
For j:=1 to 6 do
sum:=sum+a[I,j];{но это разве подсчёт каждой строчки? }
{необходимо запомнить мин и мах строки, как?}
{а дальше обмен}
K:=srt_max;
srt_max:=srt_min;

Я права? Но как это будет выглядит на Паскале не представляю!!! unsure.gif

2) пусть дано натуральное число n и целочисленная квадратная матрица порядка n. Получите b1,…,bn, где bi – это:
А)значение первого по порядку положительного элемента i-й строки (если таких нет, то принять bi=1)

i-элемент кто вводит пользователь
if a[i,j]>0 then write(a[i,j])

Б) сумма элементов, расположенных за первым отрицательным элементом в i-й строки (если все строки неотрицательные, то принять bi=100)

{что это за строка I, она вводится пользователем?????}
S:=0;
If a[I,j]<0 then s:=s+a[I,j]

С)сумма элементов, предшествующих последнему отрицательному элементу i-й строки (если все элементы строки неотрицательны, то принять bi=-1)
А эту даже не представляю как wacko.gif
и ещё воприс, я тут ну новенькая, как пользоваться кадом??? unsure.gif
 К началу страницы 
+ Ответить 
сообщение
Сообщение #4


Гость






предыдущее сообщение тоже моё unsure.gif unsure.gif unsure.gif
 К началу страницы 
+ Ответить 
сообщение
Сообщение #5


Гость






-оксана-, понимаешь в чем дело... Для того, чтобы поменять местами строки, как это требуется в первом задании, совсем не нужно
Цитата
{посчитать сумму каждой строки}
. Достаточно просто пройти по всей матрице, и найти минимум и максимум, при этом запоминая номер строки, в которой он встретился... А потом - поменять эти 2 строки местами:

i_min := 1; i_max := 1;
min: = a[i_min, 1]; max := a[i_max, 1];

for i := 1 to m do
for j := 1 to n do begin
if min > a[i, j] then begin min := a[i, j]; i_min := i; end;
if max < a[i, j] then begin max := a[i, j]; i_max := i; end;
end;
{ теперь просто меняем строку №i_min со строкой №i_max местами... }


... как это сделать - уже показывалось неоднократно, в том числе в FAQ-е.

Цитата
я тут ну новенькая, как пользоваться кадом???
Для гостей эта функция доступна, если только ты не отвечаешь через "быстрый ответ", внизу темы, а если нажимаешь на кнопку "Ответить"... Тогда тебе надо выделить мышью твой код и выбрать из комбобокса CODE правильный язык программирования...

Сообщение отредактировано: volvo -
 К началу страницы 
+ Ответить 
сообщение
Сообщение #6


просто человек
******

Группа: Пользователи
Сообщений: 3 641
Пол: Женский
Реальное имя: Юлия

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


Цитата
2) пусть дано натуральное число n и целочисленная квадратная матрица порядка n. Получите b1,…,bn, где bi – это:
А)значение первого по порядку положительного элемента i-й строки (если таких нет, то принять bi=1)

i-элемент кто вводит пользователь
if a[i,j]>0 then write(a[i,j])

нет
i изменяется от 1 до N...

то есть как-то так:
for i:=1 to n do
begin
j:=1;
while (a[i,j]<=0) and (j<=n) do
j:=j+1;
if a[i,j]>0 then
b[i]:=a[i,j]
else
b[i]:=1;
end;

набирала здесь, не проверяла...
но, думаю, идея понятна.


--------------------
Все содержимое данного сообщения (кроме цитат) является моим личным скромным мнением и на статус истины в высшей инстанции не претендует.
На вопросы по программированию, физике, математике и т.д. в аське и личке не отвечаю. Даже "один-единственный раз" в виде исключения!
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

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

 





- Текстовая версия 23.10.2021 17:44
500Gb HDD, 6Gb RAM, 2 Cores, 7 EUR в месяц — такие хостинги правда бывают
Связь с администрацией: bu_gen в домене octagram.name