0 / 0 / 0
Регистрация: 04.12.2012
Сообщений: 5
1

Сформировать третий массив из двух исходных по правилу

04.12.2012, 21:49. Показов 1066. Ответов 1
Метки нет (Все метки)

Даны два массива с числом элементов не более 30. Если соответствующие элементы исходных массивов принадлежат заданному интервалу, присвоить элементу третьего массива значение 1 , иначе – 0. Определить в каком из исходных массивов находится минимальный элемент, принадлежащий заданному интервалу и определить, сколько нулей и сколько единиц будет в полученном массиве.
__________________
Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
04.12.2012, 21:49
Ответы с готовыми решениями:

Сформировать третий массив из элементов двух исходных
даны 2 массива А и В по 15 элементов в каждом. получить новый массив Сi=Ai+Bi. найти в нем...

Сформировать новый массив по данным из двух исходных
Произвольно заданы 3 одномерных массива.Сформировать новый массив,состоящий из десяти элементов с...

Сформировать третий массив на основе двух заданных
Составьте блок-схемы алгоритмы и написать программу на Qbasic. Даны два массив:/1(5) и B{5)....

Сформировать третью матрицу из двух исходных
Помогите решить задачу на двумерные массивы. Задача:Даны два двумерных массива.Получить новый...

1
139 / 129 / 127
Регистрация: 27.09.2012
Сообщений: 627
05.12.2012, 17:16 2
Лучший ответ Сообщение было отмечено Irinka_Chirkova как решение

Решение

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
CLS
DO
INPUT "Vvedite n<30"; n
LOOP UNTIL n < 30
DIM a(1 TO n), b(1 TO n), c(1 TO n)
PRINT "Massiv A", "Massiv B"
FOR i = 1 TO n
a(i) = INT(RND * 100 - 50)
b(i) = INT(RND * 100 - 50)
NEXT i
INPUT "Vvedite interval p,q"; p, q
FOR i = 1 TO n
IF a(i) >= p AND a(i) <= q AND b(i) >= p AND b(i) <= q THEN
c(i) = 1
ELSE
c(i) = 0
END IF
NEXT i
FOR i = 1 TO n
PRINT a(i), b(i), c(i)
NEXT i
min = a(1)
FOR i = 1 TO n
IF a(i) >= p AND a(i) <= q AND b(i) >= p AND b(i) <= q THEN
IF a(i) <= min THEN min = a(i)
IF b(i) <= min THEN min = b(i)
END IF
NEXT i
FOR i = 1 TO n
IF c(i) = 1 THEN k1 = k1 + 1
IF c(i) = 0 THEN k0 = k0 + 1
NEXT i
PRINT "Minimal'noe="; min
PRINT "Kol-vo nulei="; k0
PRINT "Kol-vo edinic="; k1
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
05.12.2012, 17:16
Помогаю со студенческими работами здесь

Сформировать третий массив из элементов двух исходных по правилу
Массив А и массив B - целых чисел массив C = A*B+k к- константа равная 15. нужно вывести массив...

Сформировать третий массив из двух исходных
Даны два двумерных массива одинаковых размеров. а) Создать третий массив такого же размера, каждый...

Сформировать третий массив из двух исходных
Даны два двумерных массива одинакового размера. Создать третий массив того же размера, где каждый...

Сформировать третий массив из двух исходных
Даны два одномерных массива целых чисел (массив А, состоящий из n элементов, массив В – из m...


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

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

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