Форум программистов, компьютерный форум, киберфорум
Наши страницы
QBasic
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.67/3: Рейтинг темы: голосов - 3, средняя оценка - 4.67
opelsin
0 / 0 / 0
Регистрация: 23.01.2013
Сообщений: 4
1

Сформировать одномерный массив, который должен содержать элементы, входящие в треугольный контур

23.01.2013, 10:32. Просмотров 461. Ответов 4
Метки нет (Все метки)

Прошу помочь написать код на Turbo Basic
Нужно чтобы из двухмерной матрицы NxN (все элементы должны быть произвольными) был сформирован одномерный массив В, который должен содержать элементы входящие в треугольный контур (первый столбец, последняя строка, главная диагональ) и вывести его на экран.
Заранее благодарен.
0
QA
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
23.01.2013, 10:32
Ответы с готовыми решениями:

Сформировать массив С, который должен содержать все элементы массивов A и B
Ввести два одномерных целочисленных массива A и B из N и M элементов соответственно. Сформировать...

Сформировать массив, который должен содержать все повторяющиеся элементы массива
Ввести одномерный массив A. Сформировать массив С, который должен содержать все повторяющиеся...

Сформировать массив С, который должен содержать элементы массива A, отсутствующие в массиве B
Всем доброго времени суток:), прошу помочь с задачей в Windows Forms - "Ввести два одномерных...

Сформировать массив С, который должен содержать элементы массива A, находящиеся в массиве B
Ввести два одномерных целочисленных массива A и B из N и M элементов соответственно (размерность и...

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

4
m-ch
5559 / 842 / 281
Регистрация: 25.02.2011
Сообщений: 1,192
Записей в блоге: 1
23.01.2013, 13:35 2
Turbo Basic у меня нет, поэтому пришлось писать на QBasic
QBasic/QuickBASIC
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
CLS
INPUT "n = "; n
DIM a(n, n) AS LONG, b(n * (n + 1) / 2) AS LONG
RANDOMIZE TIMER
FOR i = 1 TO n
    FOR j = 1 TO n
        a(i, j) = INT(RND * 90 + 10)
        PRINT a(i, j);
    NEXT j
    PRINT
NEXT i
PRINT
 
FOR i = 1 TO n
    FOR j = 1 TO i
        k = k + 1
        b(k) = a(i, j)
        PRINT b(k);
NEXT j, i
1
opelsin
0 / 0 / 0
Регистрация: 23.01.2013
Сообщений: 4
23.01.2013, 14:03  [ТС] 3
Большое спасибо.
Извиняюсь за название темы, не сразу ознакомился с правилами.
0
opelsin
0 / 0 / 0
Регистрация: 23.01.2013
Сообщений: 4
23.01.2013, 18:50  [ТС] 4
Прошу помочь написать код на Qbasic
Нужно чтобы из двухмерной матрицы NxN (все элементы должны быть произвольными) был сформирован одномерный массив В, который должен содержать элементы входящие в треугольный контур (первый столбец, последняя строка, главная диагональ) и вывести его на экран.
Программа должна быть сложной структуры. (подробности во вложении)
Заранее благодарен.
0
Миниатюры
Сформировать одномерный массив, который должен содержать элементы, входящие в треугольный контур  
opelsin
0 / 0 / 0
Регистрация: 23.01.2013
Сообщений: 4
23.01.2013, 21:46  [ТС] 5
Должно получиться что то в этом роде. Но я где то допустил ошибки... Буду благодарен за исправление этой программы или за написания новой.
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
CLS
INPUT "rasmer matrici n="n
INPUT "leva9l granica l="l
DIM a(n,n)
FOR i=1 TO n
FOR j=1 TO n
a(i,j)=INT(RND*(d-c)+c)
NEXT j
NEXT i
l=0
CALL ddd(a(),b(),n,l)
GOSUB cabel
LOCATE 22,30:PRINT "good bye"
STOP
 
SUB ddd(d(2),b(1),n,l)
FOR i=1 TO n
FOR j=1 TO n
l=l+1: b(l)=a(i,j)
NEXT j
NEXT i
PRINT "konec procedyri"
delay 2
AND SUB
label:
rem nod
LOCATE 8,10:PRINT "Matrica#"
FOR i=1 TO n
FOR j=1 TO n
PRINT a(i,j): "   ";
NEXT j
NEXT i
LOCATE 18,20:PRINT:"massiv B"
FOR i=1 TO l
PRINT b(i); "  ";
NEXT i
LOCATE (8+2*i),(35+3*j):PRINT "   "
NEXT j
NEXT i
delay 5
RETURN
0
23.01.2013, 21:46
Answers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
23.01.2013, 21:46

Сформировать и вывести на экран новый массив, который будет содержать вначале все элементы массива A(0), затем все элементы массива B(4)
Здравствуйте! Помогите написать парочку программ... 3. Даны массивы A(0) и B(4). Сформировать...

Двумерный массив. Сформировать из элементов массива одномерный массив, в который поместить все нечетные элементы, которые делятся на 3
Дан двумерный массив А с размерностью NxN, элементы массива - случайные целые числа из диапазона...

Сформировать матрицы одномерный массив, в который поместить все ненулевые элементы
Дан двумерный массив А размерностью 7*7, элементы массива - случайные числа из диапазона ...


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

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

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