VBNet - Форум - ПРОВЕРЬТЕ КТО НИБУДЬ ПЛИЗЗЗ.СРОЧНО НАДО!

Вопрос: ПРОВЕРЬТЕ КТО НИБУДЬ ПЛИЗЗЗ.СРОЧНО НАДО! Добавлено: 14.03.07 23:10

Автор вопроса: стас | ICQ: 404951750

cls
data 3,1,1,-1,1,1,1,-1,1,-3,1,2,1,-1,1,-3,1,1,1,1
dim x(3,4),b(3)
? "matriza X"
k=3
l=4

gosub 10

data 2,3,4,5,6,7,8,9,0,1,2,3,4,5,6,7,8,9,0,1,2,3,4,1
dim y(5,3),a(5)
?"Matriza Y"
k=5
l=3
x=y
b=a
gosub 10

end

10 for i=0 to k
for j=0 to l
read x(i,j)
? x(i,j);
next
?
next
for i=0 to k
for j=0 to l
if x(i,j)>0 then b(i)=b(i)+x(i,j)
next
next
for i=0 to k
max=b(0)
if b(i)>=max then p=i
? b(i);
next
?
p=p+1
? "nomer stroki="p

return
Ответить

Ответы Всего ответов: 8

Номер ответа: 1 Автор ответа: GSerg Вопросов: 0 Ответов: 1876	Профиль \| \| #1	Добавлено: 14.03.07 23:43
	О дааааа, это асм... Ответить

Номер ответа: 2 Автор ответа: Arseny ICQ: 298826769 Вопросов: 53 Ответов: 1732	Профиль \| \| #2	Добавлено: 15.03.07 08:37
	Ответить

Номер ответа: 3 Автор ответа: HACKER Разработчик Offline Client Вопросов: 236 Ответов: 8362	Профиль \| \| #3	Добавлено: 15.03.07 10:08
	ггг а чё это вообще такое? С виду на басик смахивает, небось это какой-то доисторический, до н.э. и.т.п.. И задание конечно сформулировано.. короче афтар пеши исчо Ответить

Номер ответа: 4 Автор ответа: GSerg Вопросов: 0 Ответов: 1876	Профиль \| \| #4	Добавлено: 15.03.07 10:56
	ггг а чё это вообще такое? Сие есть QBasic, великий и ужасный... Ответить

Номер ответа: 5 Автор ответа: *D o c a l* ICQ: 408802757 Вопросов: 76 Ответов: 985	Web-сайт: www.doc-source.pp.net.ua/ Профиль \| \| #5	Добавлено: 15.03.07 16:30
	Страх Ответить

Номер ответа: 6 Автор ответа: Stars Вопросов: 41 Ответов: 239	Профиль \| \| #6	Добавлено: 15.03.07 17:21
	Опасно! Опасно! Ответить

Номер ответа: 7 Автор ответа: Sharp Лидер форума ICQ: 216865379 Вопросов: 106 Ответов: 9979	Web-сайт: sharpc.livejournal.com Профиль \| \| #7	Добавлено: 15.03.07 17:25
	А там еще осталась data? Ответить

Номер ответа: 8 Автор ответа: Artyom Разработчик Вопросов: 130 Ответов: 6602	Профиль \| \| #8	Добавлено: 15.03.07 19:23
	полиморфный код походу Ответить

Страница: 1 |