Форум программистов, компьютерный форум CyberForum.ru

Найти минимальный элемент массива и его порядковый номер - QBasic

Войти
Регистрация
Восстановить пароль
 
Надя9797
0 / 0 / 0
Регистрация: 05.01.2017
Сообщений: 2
05.01.2017, 16:38     Найти минимальный элемент массива и его порядковый номер #1
Добрый день! Очень прошу помочь.
1) Дан массив А(6). Найти минимальный элемент массива и его порядковый номер.
2) Составьте алгоритм и программу вычисления значений функции на произвольном отрезке с произвольным шагом:
y =  x - при -3 < x <= 3;
y = 1 / x2 - в остальных случаях.

Заранее благодарю за ответ!
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
05.01.2017, 16:38     Найти минимальный элемент массива и его порядковый номер
Посмотрите здесь:

Oпределить минимальный элемент массива и его порядковый номер, найденный минимальный элемент поменять местами с последним элементом массива. QBasic
QBasic Найти элемент последовательности(его порядковый номер и значение,ближайшее к n).
В двумерном найти минимальный элемент и указать его номер. QBasic
QBasic Найти минимальный элемент матрицы и указать его координаты
QBasic Найти минимальный элемент матрицы и вывести его и его координаты
QBasic Найти сумму элементов массива, максимальный и минимальный элемент массива
QBasic Найти минимальный элемент MIN среди положительных элементов массива D по единицам массива М
QBasic Найти порядковый номер того числа вещественного массива, которое наиболее близко к целому числу
В матрице найти минимальный элемент и поставить его на главную диагональ QBasic
Определить минимальный элемент массива, его номер строки и столбца QBasic
QBasic Найти в матрице минимальный элемент и определить его местоположение
Найти минимальное число и его порядковый номер в последовательности QBasic

Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
echs
713 / 908 / 345
Регистрация: 23.10.2013
Сообщений: 4,143
Записей в блоге: 3
05.01.2017, 17:11     Найти минимальный элемент массива и его порядковый номер #2
1.
QBasic/QuickBASIC
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
CLS
RANDOMIZE TIMER
CONST n = 6
DIM A(1 TO n) AS INTEGER
 
FOR i = 1 TO n
   A(i) = 40 * RND - 20
   PRINT A(i);
NEXT
PRINT : PRINT
 
max = A(1)
ind = 1
 
FOR i = 1 TO n
   IF max < A(i) THEN
   max = A(i)
   ind = i
   END IF
NEXT
PRINT "MAX ="; max
PRINT "IMAX ="; ind
END
2.
QBasic/QuickBASIC
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
DECLARE FUNCTION f! (x!)
 
CLS
INPUT "[A; B] = "; A, B
INPUT "SHAG H = "; h
 
FOR x = A TO B STEP h
   n = n + 1
   IF n MOD 20 = 0 THEN
      PRINT "PRESS ENTER"
      DO: LOOP UNTIL INKEY$ <> ""
      CLS
   ELSE
      PRINT USING "X = ###.###   Y = ###.###"; x; f(x)
   END IF
NEXT
END
 
FUNCTION f (x)
   IF -3 < x AND x <= 3 THEN
      f = x
   ELSE
      f = 1 / x ^ 2
   END IF
END FUNCTION
Yandex
Объявления
05.01.2017, 17:11     Найти минимальный элемент массива и его порядковый номер
Ответ Создать тему
Опции темы

Текущее время: 12:51. Часовой пояс GMT +3.
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru