Важная информация
Показано с 1 по 2 из 2

Тема: Двумерные массивы, QBasic

  1. #1 Двумерные массивы, QBasic 
    Новичок
    Регистрация
    06.06.2011
    Сообщений
    1
    Сказал(а) спасибо
    1
    Поблагодарили 0 раз(а) в 0 сообщениях
    Задача:
    Определить максимальный и минимальный элемент двух заданных матриц X (N, M) и Y (N, M)

    В школе таких задач не было, и сейчас я не знаю, что делать.( Хотя понимаю, что эта задача легкая.

    cls
    x (i, j)=int(rnd(i)*100-50)
    for i=1 to n
    for j=1 to m
    .... а дальше тьма. Помогите пожалуйста неучу.(
    Ответить с цитированием  
     

  2. #2  
    Гуру Аватар для Абадябер
    Регистрация
    09.12.2010
    Адрес
    Беларусь, Минск
    Сообщений
    1,219
    Сказал(а) спасибо
    302
    Поблагодарили 176 раз(а) в 144 сообщениях
    Записей в блоге
    5
    Вот. Тут 2 массива, X и Y заполняются сначала случайными данными, а потом из них находятся минимальный и максимальный элемент для каждой матрицы.
    Код qbasic:
    [Ссылки могут видеть только зарегистрированные пользователи. ]
    [Ссылки могут видеть только зарегистрированные пользователи. ] N [Ссылки могут видеть только зарегистрированные пользователи. ] [Ссылки могут видеть только зарегистрированные пользователи. ], M [Ссылки могут видеть только зарегистрированные пользователи. ] [Ссылки могут видеть только зарегистрированные пользователи. ]
    [Ссылки могут видеть только зарегистрированные пользователи. ] I [Ссылки могут видеть только зарегистрированные пользователи. ] [Ссылки могут видеть только зарегистрированные пользователи. ], J [Ссылки могут видеть только зарегистрированные пользователи. ] [Ссылки могут видеть только зарегистрированные пользователи. ]
    [Ссылки могут видеть только зарегистрированные пользователи. ] MaxX, MinX, MaxY, MinY
    DO
        [Ссылки могут видеть только зарегистрированные пользователи. ] "Input N [1..100]: ", N
    LOOP WHILE N < 1 [Ссылки могут видеть только зарегистрированные пользователи. ] N > 100
    DO
        [Ссылки могут видеть только зарегистрированные пользователи. ] "Input M [1..100]: ", M
    LOOP WHILE M < 1 [Ссылки могут видеть только зарегистрированные пользователи. ] M > 100
    MinX = 100: MinY = 100
    [Ссылки могут видеть только зарегистрированные пользователи. ] X(N, M) [Ссылки могут видеть только зарегистрированные пользователи. ] [Ссылки могут видеть только зарегистрированные пользователи. ]
    [Ссылки могут видеть только зарегистрированные пользователи. ] Y(N, M) [Ссылки могут видеть только зарегистрированные пользователи. ] [Ссылки могут видеть только зарегистрированные пользователи. ]
    [Ссылки могут видеть только зарегистрированные пользователи. ] [Ссылки могут видеть только зарегистрированные пользователи. ]
    FOR I = 1 TO N
        FOR J = 1 TO M
            X(I, J) = [Ссылки могут видеть только зарегистрированные пользователи. ]([Ссылки могут видеть только зарегистрированные пользователи. ] * 100) + 1
            Y(I, J) = [Ссылки могут видеть только зарегистрированные пользователи. ]([Ссылки могут видеть только зарегистрированные пользователи. ] * 100) + 1
            IF MaxX < X(I, J) THEN MaxX = X(I, J)
            IF MinX > X(I, J) THEN MinX = X(I, J)
            IF MaxY < Y(I, J) THEN MaxY = Y(I, J)
            IF MinY > Y(I, J) THEN MinY = Y(I, J)
        NEXT J
    NEXT I
    [Ссылки могут видеть только зарегистрированные пользователи. ] "X: Max = ", MaxX
    [Ссылки могут видеть только зарегистрированные пользователи. ] "X: Min = ", MinX
    [Ссылки могут видеть только зарегистрированные пользователи. ] "Y: Max = ", MaxY
    [Ссылки могут видеть только зарегистрированные пользователи. ] "Y: Min = ", MinY
    Дружба-магия-радость!
    Ответить с цитированием  
     

  3. Пользователь сказал cпасибо:

    _cvorus (06.06.2011)

Информация о теме
Пользователи, просматривающие эту тему

Эту тему просматривают: 1 (пользователей: 0 , гостей: 1)

Похожие темы

  1. Двумерные массивы
    от Sten52 в разделе QBasic
    Ответов: 4
    Последнее сообщение: 03.06.2012, 14:00
  2. QBASIC массивы
    от domvik в разделе QBasic
    Ответов: 3
    Последнее сообщение: 21.12.2011, 09:37
  3. Ответов: 0
    Последнее сообщение: 07.12.2011, 23:12
  4. Ответов: 7
    Последнее сообщение: 25.11.2011, 01:40
  5. Двумерные массивы
    от nikita в разделе QBasic
    Ответов: 0
    Последнее сообщение: 04.05.2011, 17:36
Ваши права
  • Вы не можете создавать новые темы
  • Вы не можете отвечать в темах
  • Вы не можете прикреплять вложения
  • Вы не можете редактировать свои сообщения
  •