помогите пожалста решить задачку!!!!!!!!!!!!!!!!!!!!я решила,но не знаю правильно или нет......проверьте пожалуста!!!!исправьте ошибки!!!!заранее спасибо!!!!

Задача такая: Дана матрица A размером 5*7. Сформировать одномерный массив B размером 5 по следующему правилу: если первый элемент строки матрицы положительный, то в соответствующий элемент массива B поместить сумму элементов строки, расположенных после максимального элемента этой строки; в противном случае – 0.

Вот моё решение:

Dim a(5,7) , b(5)
for i=1 to 5
for j=1 to 7
input a(i,j) , b(i)
next j,i
for i-=1 to 5
amax= -1000
for j=1 to 7
if a(i,j)>amax then amax=a(i,j) : jmax=j
next j
for i=1 to 5
for j=jmax+1 to 7
s=s+a(i,j)
next j
for i=1 to 5
for j=1 to 7
if a(i,1)>0 then b(i)=s else b(i)=0
next i
for i=1 to 5
print b(i)
next i

Примерно так

спасибо!!!!!
а почему вот тут не задано i ?

s = 0
for j = jmax+1 to 7
s = s + a(i,j)
next j

aly17_17, потому, что этот цикл по j идет внутри цикла по i (строчка next i "ниже").
PolPoll, учтено ли, что макс. может быть в "конце" строчки? (синтаксиса васьки не знаю )

Учтено.
В цикле for условие проверяется в начале - и он может ни разу не выполнится


а вот ввод b - был лишний...

вот это и интересовало

а почему ввод b был лишний??

aly17_17 , потому, что заполнять b надо по определенному условию, которое дано, а он заполнялся в цикле по i (или j) по правилу: b[i]:=i; {b[j]:=j} вообщем не парься, программу рабочую тебе дали

помогите пожалуста ещё с одной задачкой.......чёт я не пойму как делать.....

Дана матрица A размером 10*5. Преобразовать матрицу следующим образом: заменить первый элемент столбца суммой элементов столбца, расположенных после максимального элемента, если максимальный элемент находится в первой половине столбца. В противном случае оставить столбец без изменения.

вот как узнать находится элемент в 1-ой половине столбца или нет????вообще не понимаю эту задачу...(((((((((((

я вот написала........проверьте пожалуста!!!!

Dim a(10,5)
for i=1 to 10
for j=1 to 5
input a(i,j)
next j,i
for i=1 to 10
amax=-1000
for j=1 to 5
if a(i,j)>amax then amax=a(i,j):imax=i
next i
for i=1 to 10
for j=1 to 5
if imax<=5 then
for i=imax+1 to 10
s=0
for j=1 to 5
s=s+a(i,j)
next i
a(1,j)=s
next j
else exit for
end if
for i=1 to 10
for j=1 to 5
print a(i,j);
next j
print
next i

Сообщение отредактировал aly17_17 - 6.1.2009, 18:36

мда... давай гадать, какое у тебя условие. говорю сразу, начальное условие дано неполностью/некорректно. пусть дана матрица А:

тогда, что должно получиться?
A' - первая строка "модифицированной" матрицы

PS все ИМХО

как некорректное?))))задали такую задачку.......не я условие придумала)))))))

посмотри на пример. в четвертом столбце два элемента имеют максимальное значение (7). так после какого нужно считать сумму элементов: после (2;4) - получится 14 или после (3;4) - получится 7. а если будет так, что один из элементов, хранящих максимальное значение, будет в "верхней" части, а второй в "нижней" (смотри пятый столбец - элементы (5;5) и (6;5)). тогда как быть?

Сообщение отредактировал Denis - 7.1.2009, 9:33

максимальный индекс должен быть <=5 и тогда будет в первой половине столбца

aly17_17 , ты видимо мои посты ваще не читаешь. ну что же, я пытался помочь

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

откуда я знаю как быть!!)))))))я ж в этом практически не разбираюсь!думаешь почему я спрашиваю)))))))

спасибо!!!!а после a(1,j)=s не надо писать else exit for ?там же написано что если max не находится в первой половине столбца,то оставить столбец без изменений

Разве остальные столбцы дальше в цикле разбирать не надо?

Вот по этому по ветке else ничего и не делается - даже самой ветки нет - зачем она пустая?