Форум программистов, компьютерный форум, киберфорум
QBasic
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
QBasic Определить, поместится ли в круг радиуса r квадрат со стороной а программа: input a,r d:=a*sqr(2) if d <= 2 * r then z$="поместитсяЭ else z$="не поместится" print z$ сама задача: определить поместится ли в круг радиуса r квадрат со стороной а https://www.cyberforum.ru/ qbasic/ thread581714.html Задача на нахождение суммы QBasic
Написать программу на языке Basic,найти величину S и вывести ее на печать.Заранее благодарю за ответ. S=\sum_{i=1}^{n}\frac{4Xi+\left| 2Xi\right|}{Xi*Xi+1}
QBasic Найти произведение ненулевых элементов матрицы заданных формулой Найти произведение ненулевых элементов матрицы заданных формулой А(i,y)=4-y. Пожалуйста, помогите, заранее благодарен!)) https://www.cyberforum.ru/ qbasic/ thread581522.html QBasic Построить графики функций (на одной координатной сетке) https://www.cyberforum.ru/ qbasic/ thread581485.html
Срочно нужна помощь по графике. Задача. Построить графики функций (на одной координатной сетке). Вывести всю сопроводительную информацию (обозначение осей, масштаб, единичный отрезок, надписать графики функций) Примеры Хнач Хкон шаг Примеры -10 10 0.01 1)y=150-20*x 0 10 0.03 ...
QBasic В массиве D(15) заменить отрицательные элементы нулем
1) В массиве D(15) заменить отрицательные элементы нулем. 2) В этом же массиве напечатать индекс наибольшего элемента. Пожалуйста помогите! И как будет выглядеть алгоритм для второй задачи?
QBasic Найти произведение ненулевых элементов матрицы заданных формулой https://www.cyberforum.ru/ qbasic/ thread580841.html
формулой: А(i,y)=4-y реюят,нужна программа и алогоритм к ней,зарание спасибо
QBasic Получите новый массив, каждый элемент которого равен удвоенному соответствующему элементу исходного массива https://www.cyberforum.ru/ qbasic/ thread580639.html
У меня проблема....учительница задала задачу....мучаюсь,не могу решить по теме:Массивы.Решите мне ее пожалуйста.У меня спорная между 4 и 3...Срочно нужно решить.Вот она:Сформируйте массив содержащий 15 элементов,с помощью датчика случайных чисел.Получите новый массив,каждый элемент которого равен удвоенному соответствующему элементу исходного массива.В полученном массиве найдите максимальный...
QBasic Найти количество различных чисел в последовательности
Симпатичная девушка попросила дать решение, а я к сожалению не знаю бейсик (стыдно). Помогите с решением): Дана последовательность целых чисел. Найти количество различных чисел в этой последовательности.
QBasic Составьте программу, печатающую индексы элементов массива, которые равны A Задано значение A и массив B(N). Составьте программу, печатающую индексы элементов массива, которые равны A Срочно надо, пожалуйста https://www.cyberforum.ru/ qbasic/ thread580518.html QBasic Записать среднее арифметическое всех элементов массива и образовать новый массив B(2n) После каждого элемента исходного массива A(n) записать среднее арифметическое всех его элементов и образовать новый массив B(2n) Вывести оба массива. https://www.cyberforum.ru/ qbasic/ thread580218.html
При K=1 увеличить значение элементов массива на A QBasic
Решите пожалуйста, заранее СПАСИБО 1)В программе описан одномерный целочисленный массив с индексами от 0 до 10. В приведенном ниже фрагменте программы массив сначала заполняется, а потом изменяется: For I = 0 to 10 A = i For I = 1 to 11 A Чему будут равны элементы этого массива? 1)10 9 8 7 6 5 4 3 2 1 0 2) 11 10 9 8 7 6 5 4 3 2 1
QBasic Вводится N целых чисел посчитать сумму положительных и отрицательных https://www.cyberforum.ru/ qbasic/ thread579559.html
1) Вводится N целых чисел посчитать сумму положительных и отрицательных 2) Заданы длины сторон А и В определить равнобедренный ли треугольник
1255 / 705 / 359
Регистрация: 20.02.2010
Сообщений: 1,035
24.05.2012, 20:32 0

Определить индекс минимального и индекс максимального значений массива - QBasic - Ответ 3076505

24.05.2012, 20:32. Показов 3426. Ответов 5
Метки (Все метки)

Ответ

определение индекса минимального элемента массива
QBasic/QuickBASIC
1
2
3
4
5
min = a(1)
imin = 1
FOR i = 2 TO n
    IF a(i) < min THEN min = a(i): imin = i
NEXT
определение индекса максимального элемента массива
QBasic/QuickBASIC
1
2
3
4
5
max = a(1)
imax = 1
FOR i = 2 TO n
    IF a(i) > max THEN max = a(i): imax = i
NEXT
ввод и вывод сможете сами приделать?

Вернуться к обсуждению:
Определить индекс минимального и индекс максимального значений массива QBasic
0
Заказать работу у эксперта
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
24.05.2012, 20:32
Готовые ответы и решения:

Определить индекс минимального и индекс максимального элементов
3 Одномерные массивы Дан массив. Определить индекс минимального и индекс максимального элементов.

Определить индекс максимального и минимального элементов массива
Дан массив . Определить : а)максимальный елемент б)минимальный елемент в)на сколько...

В строке первый символ получает индекс 1, последний индекс 2, второй индекс 3, предпоследний индекс 4, третий индекс 5
В строке первый символ получает индекс 1, последний индекс 2, второй индекс 3, предпоследний индекс...

Определить индекс максимального элемента массива
здрасьте! решите, пожалуйста, 2 задачки. 1-я: кол-во элементов массива 6. тип элементов...

5
24.05.2012, 20:32
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
24.05.2012, 20:32
Помогаю со студенческими работами здесь

Определить индекс и значение максимального элемента массива
Напишите программу, которая вводит с клавиатуры 20 реальных чисел, организовывает их хранение в...

Определить значение минимального элемента массива и его индекс
Даны вещественные массивы А, F. В каждом массиве определить значение минимального элемента и его...

Определить индекс минимального элемента массива из 12 целых чисел
2. Определить индекс минимального элемента массива из 12 целых чисел.

Как найти индекс максимального и минимального элементов?
Найти в таблице максимальный и минимальный элемент и определить какой из них располагается раньше....

0
Новые блоги и статьи
Какой язык программировани­я лучший для разработки нейронных сетей
InfoMaster 20.01.2025
В современном мире технологий искусственные нейронные сети становятся неотъемлемой частью множества инновационных решений, от распознавания речи до автоматического управления транспортными. . .
Как подключить JavaScript файл в другом JavaScript файле
InfoMaster 20.01.2025
В современной веб-разработке организация кодовой базы играет ключевую роль в создании масштабируемых и поддерживаемых приложений. Модульность и правильное структурирование кода стали неотъемлемыми. . .
Как откатить изменения в исходниках, не внесенные в Git
InfoMaster 20.01.2025
При работе с системой контроля версий Git разработчики часто сталкиваются с необходимостью отменить внесенные изменения в исходном коде. Особенно актуальной становится ситуация, когда изменения еще. . .
В чем разница между px, in, mm, pt, dip, dp, sp
InfoMaster 20.01.2025
В мире цифрового дизайна и разработки интерфейсов правильный выбор единиц измерения играет ключевую роль в создании качественного пользовательского опыта. История развития систем измерений для. . .
Как изменить адрес удалённого репозитория (origin) в Git
InfoMaster 20.01.2025
В терминологии Git термин origin является стандартным именем для основного удаленного репозитория, с которым взаимодействует локальная копия проекта. Когда разработчик клонирует репозиторий с. . .
Как переместить последние коммиты в новую ветку (branch) в Git
InfoMaster 20.01.2025
При работе над проектом часто возникают ситуации, когда необходимо изолировать определенные изменения от основной линии разработки. Это может быть связано с экспериментальными функциями, исправлением. . .
Как вернуть результат из асинхронной функции в JavaScript
InfoMaster 20.01.2025
Асинхронное программирование представляет собой фундаментальную концепцию в JavaScript, которая позволяет выполнять длительные операции без блокировки основного потока выполнения программы. В. . .
Какой локальный веб-сервер выбрать
InfoMaster 19.01.2025
В современной веб-разработке локальные веб-серверы играют ключевую роль, предоставляя разработчикам надежную среду для создания, тестирования и отладки веб-приложений без необходимости использования. . .
Почему планшеты и iPad уже не так популярны, как раньше
InfoMaster 19.01.2025
Эра революционных инноваций История планшетов началась задолго до того, как эти устройства стали привычными спутниками нашей повседневной жизни. В начале 1990-х годов появились первые прототипы,. . .
Как самому прошить BIOS ноутбука
InfoMaster 19.01.2025
BIOS (Basic Input/ Output System) представляет собой важнейший компонент любого компьютера или ноутбука, который обеспечивает базовое взаимодействие между аппаратным и программным обеспечением. . .
Какой Linux выбрать для домашнего компьютера
InfoMaster 19.01.2025
Современные реалии выбора операционной системы В современном мире выбор операционной системы для домашнего компьютера становится все более важным решением, которое может существенно повлиять на. . .
Как объединить два словаря одним выражением в Python
InfoMaster 19.01.2025
В мире программирования на Python работа со словарями является неотъемлемой частью разработки. Словари представляют собой мощный инструмент для хранения и обработки данных в формате "ключ-значение". . . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru