Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 11.05.2009, 20:14   #1
Nato4ka
 
Регистрация: 11.05.2009
Сообщений: 4
Вопрос как сделать,чтобы только в 3 строке решала?

Задача:

в 3 строке заданной матрицы вычислить количество положительных элементов. для заполнения использовать генератор случайных чисел,предусмотреть заполнение положительными и отрицательными числами


код: р:=0; for i:=1 to 5 do fo j:=1 to 5 do if A[i,j]>0 then inc (p); writeln (p);

а вопрос такой: она считает все положительные числа, а как сделать,чтобы только в 3 строке решала?

Последний раз редактировалось Nato4ka; 11.05.2009 в 20:37. Причина: =)
Nato4ka вне форума Ответить с цитированием
Старый 11.05.2009, 20:36   #2
IT-man
АльTRUEи$т
Форумчанин
 
Аватар для IT-man
 
Регистрация: 19.03.2009
Сообщений: 784
По умолчанию

Код:
р:=0; 
for i:=1 to 5 do 
if A[3,i]>0 then inc (p); 
writeln (p);
Цитата:
«Никто не войдет в Рай, имея хотя бы крупицу гордыни в своем сердце». «Аллах Красив и любит красоту. Гордыня означает отказ от истины и высокомерие»
IT-man вне форума Ответить с цитированием
Старый 11.05.2009, 20:38   #3
Disel
Форумчанин
 
Аватар для Disel
 
Регистрация: 08.01.2009
Сообщений: 180
По умолчанию

Первый цикл не нужен. В Вашем случае:
Код:
.......................
         for j:=1 to 5 do
           if A[3,j]>0 then
           ....................

P.S. Чуть опоздал

IT-man, по моему мнению, в Вашем придложеном коде будет искать положительные элементы по третьему столбцу.
"Все что натыкано на клаве, ведет тебя к погибели иль славе"
Если помог нажми на весы

Последний раз редактировалось Disel; 11.05.2009 в 20:43.
Disel вне форума Ответить с цитированием
Старый 11.05.2009, 20:47   #4
Nato4ka
 
Регистрация: 11.05.2009
Сообщений: 4
Хорошо

Спасибо ребята огроменное вам, на вашем форуме первый день и сразу уже помогли
Спасибо Disel
Nato4ka вне форума Ответить с цитированием
Старый 11.05.2009, 20:56   #5
IT-man
АльTRUEи$т
Форумчанин
 
Аватар для IT-man
 
Регистрация: 19.03.2009
Сообщений: 784
По умолчанию

2дизель! а чем мой код от вашего то отличается. Буквой ?
Цитата:
«Никто не войдет в Рай, имея хотя бы крупицу гордыни в своем сердце». «Аллах Красив и любит красоту. Гордыня означает отказ от истины и высокомерие»
IT-man вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц