Форум программистов, компьютерный форум, киберфорум
Наши страницы
Basic
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.60/5: Рейтинг темы: голосов - 5, средняя оценка - 4.60
Tock
0 / 0 / 0
Регистрация: 10.03.2017
Сообщений: 6
1

Вычислить отдельно суммы наименьших и наибольших значений массивов

10.03.2017, 19:13. Просмотров 895. Ответов 2
Метки нет (Все метки)

Вычислить отдельно суммы наименьших и наибольших значений массивов Х1(15), Х2(20).
0
Лучшие ответы (1)
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
10.03.2017, 19:13
Ответы с готовыми решениями:

Вычислить отдельно суммы положительных и отрицательных элементов массива, и количество нулей
Доброго время суток! Помогите пожалуйста решить задачку по информатике! Очень надо на завтра!...

Как составить массив m x 2, где 1-й столбец составлен из сумм трёх наименьших, 2-й из суммы трёх наибольших элементов массива m x n
Дан двумерный массив (m x n ) составить двумерный массив размерности m x 2, где 1 -ы столбец ...

Вычислить отдельно суммы и произведения положительных и отрицательных элементов массива
Вычислить отдельно суммы и произведения положительных и отрицательных элементов массива А (3 х 5...

Размещение наибольших и наименьших чисел
По массиву случайных чисел найти и разместить на листе а) наибольшие по строке числа б)...

В действительной матрице найти суммы наибольших и наименьших значений строк
Дана действительная матрица MxN. Определить числа x1, x2, ..., xm, равные соответственно суммам...

2
echs
Регистрация: 23.10.2013
Сообщений: 5,076
Записей в блоге: 8
11.03.2017, 10:57 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
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
DECLARE SUB MM (x%(), min!, max!, n!)
DECLARE SUB AUS (x%(), n!)
 
CLS
RANDOMIZE TIMER
DIM x1(15) AS INTEGER
DIM x2(20) AS INTEGER
 
CALL AUS(x1(), 15)
CALL AUS(x2(), 20)
 
CALL MM(x1(), min1, max1, 15)
CALL MM(x2(), min2, max2, 20)
 
smin = min1 + min2
smax = max1 + max2
 
PRINT "Smin ="; smin
PRINT "Smax ="; smax
END
 
SUB AUS (x() AS INTEGER, n)
   FOR i = 1 TO n
      x(i) = 40 * RND - 20
      PRINT x(i);
   NEXT
   PRINT : PRINT
END SUB
 
SUB MM (x() AS INTEGER, min, max, n)
   min = x(1)
   max = x(1)
  
   FOR i = 1 TO n
      IF min > x(i) THEN
         min = x(i)
      END IF
 
      IF max < x(i) THEN
         max = x(i)
      END IF
   NEXT i
END SUB
0
Sasha_Smirnov
5489 / 1317 / 144
Регистрация: 08.02.2009
Сообщений: 4,041
Записей в блоге: 29
29.03.2017, 14:28 3
Лучший ответ Сообщение было отмечено Tock как решение

Решение

Цитата Сообщение от echs Посмотреть сообщение
QBasic/QuickBASIC
1
2
smin = min1 + min2
smax = max1 + max2
А там их вовсе не обязательно по одному! Скажем, возьмите массив месяцев с пятью средами…
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
29.03.2017, 14:28

Сформировать вектор из суммы наибольших и наименьших значений элементов столбцов
Здравствуйте. помогите пожалуйста решить задачку. что то я запутался... Сформировать вектор из...

Сформировать вектор из суммы наибольших и наименьших значений элементов столбцов матрицы
Добрый день. Помогите, пожалуйста. Задана квадратная матрица размером N x N (N&lt;=10), ...

Создать функцию, определяющую суммы наибольших и наименьших значений элементов каждой строки каждой матрицы. Вывести на экран исходные матрицы и их
Создать функцию, определяющую суммы наибольших и наименьших значений элементов каждой строки...


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

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2019, vBulletin Solutions, Inc.
Рейтинг@Mail.ru