Технический форум
Вернуться   Технический форум > Программирование > Форум программистов > Basic


Ответ
 
Опции темы Опции просмотра
Старый 16.12.2012, 16:46   #1 (permalink)
alexeyTTT
Новичок
 
Регистрация: 16.12.2012
Сообщений: 7
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 10
Exclamation Задача в QBasic

Вычислить и запомнить в одномерных массивах P(m) и K(m) произведения и количества отрицательных элементов каждого столбца матрицы D(n,m) (считать, что в каждом столбце матрицы есть отрицательный элемент)
alexeyTTT вне форума   Ответить с цитированием

Старый 16.12.2012, 16:46
Helpmaster
Member
 
Аватар для Helpmaster
 
Регистрация: 08.03.2016
Сообщений: 0

Имеет смысл пролистать аналогичные посты

QBasic, массивы
Еще задачи в QBasic

Старый 17.12.2012, 11:11   #2 (permalink)
MoNeTa
Member
 
Аватар для MoNeTa
 
Регистрация: 01.02.2008
Сообщений: 300
Сказал(а) спасибо: 0
Поблагодарили 1 раз в 1 сообщении
Репутация: 252
По умолчанию

CLS
INPUT "stroki"; n
INPUT "stolbci"; m
DIM D(n, m), P(m), K(m)
FOR i = 1 TO m
s = 0
z = 1
FOR x = 1 TO n
PRINT "D("; x; i; ")";
INPUT D(x, i)
IF D(x, i) < 0 THEN s = s + 1 ELSE 10
z = z * D(x, i)
10 NEXT
IF s = 0 THEN P(i) = 0 ELSE P(i) = z
K(i) = s
NEXT
PRINT "D(n,m)"
FOR i = 1 TO n
FOR x = 1 TO m
PRINT D(i, x);
NEXT
PRINT
NEXT
PRINT "P(m)"
FOR i = 1 TO m
PRINT P(i);
NEXT
PRINT
PRINT "K(m)"
FOR i = 1 TO m
PRINT K(i);
NEXT
MoNeTa вне форума   Ответить с цитированием
Старый 18.12.2012, 16:17   #3 (permalink)
alexeyTTT
Новичок
 
Регистрация: 16.12.2012
Сообщений: 7
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 10
По умолчанию

Огромнейшее спасибо, просто жизнь спасли)
alexeyTTT вне форума   Ответить с цитированием
Ads

Яндекс

Member
 
Регистрация: 31.10.2006
Сообщений: 40200
Записей в дневнике: 0
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 55070
Ответ

Опции темы
Опции просмотра

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Выкл.
HTML код Выкл.
Trackbacks are Вкл.
Pingbacks are Вкл.
Refbacks are Выкл.




Часовой пояс GMT +4, время: 08:05.

Powered by vBulletin® Version 6.2.5.
Copyright ©2000 - 2014, Jelsoft Enterprises Ltd.