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

Тема: одномерные массивы, QBasic, помогите пожалуйста)

  1. #1 одномерные массивы, QBasic, помогите пожалуйста) 
    Новичок
    Регистрация
    24.11.2011
    Сообщений
    6
    Сказал(а) спасибо
    1
    Поблагодарили 0 раз(а) в 0 сообщениях
    Дан массив из n элементов. Определить максимальный элемент и его индекс, если максимальный элемент массива и среднее значение элементов массива >2
    помогите пожалуйста))
    Ответить с цитированием  
     

  2. #2  
    Профи Аватар для Кертис
    Регистрация
    17.11.2011
    Сообщений
    105
    Сказал(а) спасибо
    1
    Поблагодарили 9 раз(а) в 9 сообщениях
    Массив вводится с клавиатуры? Что-то непонятно нахрена вообще условие про средние значение элементов.
    В общем, как-то так:
    Код :
    PRINT "N?"
    DIM arr(n)
    FOR i=0 TO N-1
      PRINT "Enter the element of array:"
      INPUT arr(i)
    NEXT i
    max=arr(0)
    index=0
    FOR i=0 TO N-1
    IF arr(i)>max THEN 
    max=arr(i)
    index=i
    NEXT i
    PRINT "Element and his number:"
    PRINT max
    PRINT index
    Ответить с цитированием  
     

  3. #3  
    Новичок
    Регистрация
    24.11.2011
    Сообщений
    6
    Сказал(а) спасибо
    1
    Поблагодарили 0 раз(а) в 0 сообщениях
    было определенное задание, а препод решила подсластить и добавила эту хрень(
    спасибо большое)
    Ответить с цитированием  
     

  4. #4  
    Новичок
    Регистрация
    24.11.2011
    Сообщений
    6
    Сказал(а) спасибо
    1
    Поблагодарили 0 раз(а) в 0 сообщениях
    а можно array изменить на какой-нибудь другой оператор?
    или можно вместо него писать mass?
    просто впервые вижу этот arr
    Ответить с цитированием  
     

  5. #5  
    Профи Аватар для Кертис
    Регистрация
    17.11.2011
    Сообщений
    105
    Сказал(а) спасибо
    1
    Поблагодарили 9 раз(а) в 9 сообщениях
    Можно-можно
    Ответить с цитированием  
     

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

    vika_lush (25.11.2011)

  7. #6  
    Новичок
    Регистрация
    24.11.2011
    Сообщений
    6
    Сказал(а) спасибо
    1
    Поблагодарили 0 раз(а) в 0 сообщениях
    спасибо)
    но, к сожалению, программа не идет, показывает NEXT without FOR
    и выделяет NEXT i
    что делать? не подскажите?
    Ответить с цитированием  
     

  8. #7  
    Профи Аватар для Кертис
    Регистрация
    17.11.2011
    Сообщений
    105
    Сказал(а) спасибо
    1
    Поблагодарили 9 раз(а) в 9 сообщениях
    Мой завтык. Правильно так:
    Код :
    PRINT "N?"
    INPUT N
    DIM arr(n)
    FOR i=0 TO N-1
      PRINT "Enter the element of array:"
      INPUT arr(i)
    NEXT i
    max=arr(0)
    index=0
    FOR i=0 TO N-1
    IF arr(i)>max THEN 
    max=arr(i)
    index=i
    END IF
    NEXT i
    PRINT "Element and his number:"
    PRINT max
    PRINT index
    Ответить с цитированием  
     

  9. #8  
    Новичок
    Регистрация
    24.11.2011
    Сообщений
    6
    Сказал(а) спасибо
    1
    Поблагодарили 0 раз(а) в 0 сообщениях
    Спасибочки)
    Ответить с цитированием  
     

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

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

Похожие темы

  1. Ответов: 0
    Последнее сообщение: 14.11.2012, 22:34
  2. Ответов: 5
    Последнее сообщение: 07.10.2012, 15:27
  3. Одномерные массивы
    от оля в разделе Turbo Pascal
    Ответов: 7
    Последнее сообщение: 15.12.2011, 23:59
  4. Ответов: 0
    Последнее сообщение: 07.12.2011, 23:12
  5. Ответов: 0
    Последнее сообщение: 01.06.2011, 14:35
Ваши права
  • Вы не можете создавать новые темы
  • Вы не можете отвечать в темах
  • Вы не можете прикреплять вложения
  • Вы не можете редактировать свои сообщения
  •