Не стандартная матрица и ее сумма

echs · Регистрация: 23.10.2013

Студворк — интернет-сервис помощи студентам

Дана матрица размером 4×6. Она заполнена случайными
числами. Всего 48 чисел. То есть вдвое больше, чем элементов
матрицы. Как это сделано? Первое число идет в качестве целой
части элемента матрицы, а второе число в качестве дробной
части элемента матрицы.
пример, два числа 22 и 33 записать в виде одного элемента
матрицы. Это можно сделать так 22,33 или так 33,22
Требуется найти "сумму матрицы"
Сумма вычисляется так. Каждый элемент матрицы представляется
в виде дроби. В числитель идет меньшее число, а в знаменатель
большее. Пример 22,33 = 22/33. И все надо сложить.
(Программа проверена)
Вопрос
Как еще можно представить два числа в виде одного
элемента матрицы и решить эту же самую задачу?

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
CLS
RANDOMIZE TIMER
n = 4
m = 6
DIM x(n, m)
 
FOR i = 1 TO n
FOR j = 1 TO m
   a = FIX(40 * RND) + 1
   b = FIX(40 * RND) + 1
   x(i, j) = a + b / 100
   PRINT USING "  ##.##"; x(i, j);
NEXT j: PRINT
NEXT i: PRINT
 
FOR i = 1 TO n
FOR j = 1 TO m
   a = INT(x(i, j))
   b = 100 * (x(i, j) - a)
   IF a > b THEN SWAP a, b
   s = s + a / b
NEXT j, i
 
PRINT "S ="; s
END

@volvo · 26.08.2016, 20:15

Создать свой тип и решить:

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
TYPE T
    n AS INTEGER ' numerator = числитель
    d AS INTEGER ' denominator = знаменатель
END TYPE
 
CLS
 
RANDOMIZE TIMER
n = 4
m = 6
DIM x(n, m) AS T
 
FOR i = 1 TO n
FOR j = 1 TO m
   x(i, j).n = FIX(40 * RND) + 1
   x(i, j).d = FIX(40 * RND) + 1
   PRINT USING "  ##/##"; x(i, j).n; x(i, j).d;
NEXT j: PRINT
NEXT i: PRINT
 
FOR i = 1 TO n
FOR j = 1 TO m
   a = x(i, j).n
   b = x(i, j).d
   IF a > b THEN SWAP a, b
   s = s + a / b
NEXT j, i
 
PRINT "S ="; s
END

echs · 27.08.2016, 08:17 **[ТС]**

volvo
Спасибо! Я не ожидал такого ответа. У меня было пара
предположений типа:
1. Задать матрицу типа STRING (в строку все войдет)
2. Задать матрицу типа LONG (сюда тоже эти числа поместятся)
3. Были мысли о трехмерной матрице (но это не то)
Ну раз так, то спасибо Вам volvo Еще раз!

Новые блоги и статьи Все статьи Все блоги /
Автозаполнение реквизита при выборе элемента справочника Maks 27.03.2026 Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. При выборе "Спецтехники" (Тип Справочник. Спецтехника), заполняется. . .	Сумматор с применением элементов трёх состояний. Hrethgir 26.03.2026 Тут. https:/ / fips. ru/ EGD/ ab3c85c8-836d-4866-871b-c2f0c5d77fbc Первый документ красиво выглядит, но без схемы. Это конечно не даёт никаких плюсов автору, но тем не менее. . . всё может быть. . .	Автозаполнение реквизитов при создании документа Maks 26.03.2026 Программный код из решения ниже размещается в модуле объекта документа, в процедуре "ПриСозданииНаСервере". Алгоритм проверки заполнения реализован для исключения перезаписи значения реквизита,. . .	Команды формы и диалоговое окно Maks 26.03.2026 1. Команда формы "ЗаполнитьЗапчасти". Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. В качестве источника данных. . .
Кому нужен AOT? DevAlt 26.03.2026 Решил сделать простой ланчер Написал заготовку: dotnet new console --aot -o UrlHandler var items = args. Split(":"); var tag = items; var id = items; var executable = args;. . .	Отправка уведомления на почту при изменении наименования справочника Maks 24.03.2026 Программная отправка письма электронной почты на примере изменения наименования типового справочника "Склады" в конфигурации БП3. Перед реализацией необходимо выполнить настройку системной учетной. . .	модель ЗдравоСохранения 5. Меньше увольнений- больше дохода! anaschu 24.03.2026 Теперь система здравосохранения уменьшает количество увольнений. 9TO2GP2bpX4 a42b81fb172ffc12ca589c7898261ccb/ https:/ / rutube. ru/ video/ a42b81fb172ffc12ca589c7898261ccb/ Слева синяя линия -. . .	Midnight Chicago Blues kumehtar 24.03.2026 Такой Midnight Chicago Blues, знаешь?. . Когда вечерние улицы становятся ночными, а ты не можешь уснуть. Ты идёшь в любимый старый бар, и бармен наливает тебе виски. Ты смотришь на пролетающие. . .

echs Регистрация: 23.10.2013 Сообщений: 5,076 Записей в блоге: 8
	27.08.2016, 08:17 [ТС]
	volvo Спасибо! Я не ожидал такого ответа. У меня было пара предположений типа: 1. Задать матрицу типа STRING (в строку все войдет) 2. Задать матрицу типа LONG (сюда тоже эти числа поместятся) 3. Были мысли о трехмерной матрице (но это не то) Ну раз так, то спасибо Вам volvo Еще раз! 0