Форум программистов, компьютерный форум, киберфорум
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. Показов 3414. Ответов 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
Заказать работу у эксперта

Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
24.05.2012, 20:32
Готовые ответы и решения:

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

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

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

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

5
24.05.2012, 20:32
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
24.05.2012, 20:32
Помогаю со студенческими работами здесь

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

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

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

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

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru