IPB

Здравствуйте, гость ( Вход | Регистрация )

> Двумермерные массивы в QBASIC
Татьяна Суханова
сообщение 26.2.2012, 7:35
Сообщение #1


Школьник
*

Группа: Продвинутые
Сообщений: 23
Регистрация: 25.9.2011
Город: тула
Учебное заведение: ТулГУ
Вы: студент



Найти максимальное значение в двумерном числовом массиве А().

INPUT M
INPUT N
DIM A(M,N)
DIM B(M,1)
FOR J=1 TO N
FOR I=1 TO M
A(I,J)=INT(RND(1))*100
NEXT
NEXT
FOR J=1 TO N
FOR I=1 TO M
PRINT A(I,J)
NEXT
PRINT
NEXT
FOR I=1 TO M
MAX=A(I,J)
FOR J=2 TO N
IF MAX < A(I,J) THEN MAX = A(I,J)
NEXT
B(I,1)=MAX
NEXT
FOR I=1 TO N
PRINT B(I, 1)
NEXT
PRINT

Как дальше подскажите??????????????????
Пользователь в офлайнеКарточка пользователяОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения

Сообщений в этой теме


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

 



- Текстовая версия Сейчас: 25.5.2025, 16:35

Книжки в помощь: "Сборник заданий по высшей математике" Кузнецов Л.А., "Сборник заданий по высшей математике" Чудесенко В.Ф., "Индивидуальные задания по высшей математике" Рябушко А.П., и другие.




Зеркало сайта Решебник.Ру - reshebnik.org.ru