Register

OR

Do you already have an account? Login

Login

OR

Don't you have an account yet? Register

Newsletter

Submit to our newsletter to receive exclusive stories delivered to you inbox!

Найти максимальный элемент одномерного массива, содержащего
А) 10 элементов;
Б) n элементов (число элементов массива вводится с клавиатуры) (в Qbasic)

более месяца назад
Просмотров : 77    Ответов : 1   

Лучший ответ:

Только программы (без примеров):
А)
CLS
DIM a(1 TO 10) AS INTEGER
PRINT "Введите 10 чисел"
FOR i = 1 TO 10
   INPUT a(i)
NEXT i
max = a(1)
FOR i = 2 TO 10
   IF a(i) > max THEN max = a(i)
NEXT i
PRINT "max = ";max
END

Б)
CLS
INPUT "Введите количество элементов массива"; n
DIM a(n)
FOR i = 1 TO n
INPUT "Введите значение элемента: "; a(i)
NEXT i
max = a(1)
FOR i = 2 TO n
   IF a(i) > max THEN max = a(i)
NEXT i
PRINT "max = ";max
END

более месяца назад
Ваш ответ:
Комментарий должен быть минимум 20 символов
Чтобы получить баллы за ответ войди на сайт





Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров и нажмите кнопку Просмотр анимации.


Другие вопросы: