Форум программистов, компьютерный форум, киберфорум
Visual Basic
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.77/13: Рейтинг темы: голосов - 13, средняя оценка - 4.77
0 / 0 / 0
Регистрация: 17.12.2009
Сообщений: 6

Как сравнить все числа каждой строки матрицы с заданным числом? VB 6.0

17.12.2009, 00:15. Показов 2836. Ответов 6
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Даны натуральное число n, действительное число х, действительная матрица размера n х 2n .Получить последовательность b(1), ... , b(n) из нулей и единиц, где b(i)=1, если элементы i-ой строки матрицы не превосходят х и b(i)=0 в противном случае.
Помогите решить эту задачу если есть такая возможность =) Заранее спасибо.
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
17.12.2009, 00:15
Ответы с готовыми решениями:

Сравнить строки каждой матрицы
даны 2 массива сравнить строки каждрй матрицы если 1-й элемент 1-го массива больше чем у 2-го то нужно записать ее как 1а если меньше то 0,...

Сравнить набор чисел с заданным числом
Даны целые числа K, N и набор из N целых чисел. Если в наборе имеются числа, меньшие K, то вывести True; в противном случае вывести False. ...

Как разбить папку c N-ным количеством PDF-документов на папки с заданным числом файлов, одинаковым для каждой?
Помогите пожалуйста составить скрипт, для разбития папки, или может кто знает программу для таких действий, ситуация проста Приходит...

6
 Аватар для BasicMan
19318 / 2625 / 84
Регистрация: 17.02.2009
Сообщений: 30,364
17.12.2009, 00:44
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
dim n as integer, x as double, arr() as double, flg as boolean, b() as byte
n=inputbox("NNN")
x=inputbox("XXX")
redim arr(1 to n,1 to 2*n)
redim b(1 to n)
for i=1 to n
flg=false
for j=1 to 2*n
arr(i,j)=inputbox("ARRAY")
if arr(i,j)<=x then flg=true
next j
b(i)=abs(flg)
next i
 
for i=1 to n
msgbox b(i)
next i
1
0 / 0 / 0
Регистрация: 17.12.2009
Сообщений: 6
17.12.2009, 01:39  [ТС]
Большое тебе спасибо) Но у меня как у полного чайника возникли некоторые вопросы... Что означают записи:
1. flg As Boolean
2. flg = False
3. b(i) = Abs(flg)
Кароче что такое есть етот flg?
и еще, как можно сделать чтобы результат выводился в текстовое окно? а то я попробовал так сделать но у меня почему то выводится слегка не то что нужно) еще раз спс =)
0
 Аватар для BasicMan
19318 / 2625 / 84
Регистрация: 17.02.2009
Сообщений: 30,364
17.12.2009, 01:52
Цитата Сообщение от chopp Посмотреть сообщение
Кароче что такое есть етот flg?
эт переменная так обозвана, можно было назвать например так
Visual Basic
1
2
3
что_такое_есть_етот_flg As Boolean 
что_такое_есть_етот_flg = False
b(i) = Abs(что_такое_есть_етот_flg)
1
0 / 0 / 0
Регистрация: 17.12.2009
Сообщений: 6
17.12.2009, 02:01  [ТС]
да в принципе я так и думал, я имел ввиду в моей задаче что обозначает эта переменная? и что это за тип такой boolean? про такой не слышал можно ли его заменить на тот же integer? и что значит flg = False , b(i) = Abs(flg)?
0
 Аватар для BasicMan
19318 / 2625 / 84
Регистрация: 17.02.2009
Сообщений: 30,364
17.12.2009, 02:22
держи кусок МСДН про булевый тип данных
Boolean Data Type (Visual Basic)
Holds values that can be only True or False. The keywords True and False correspond to the two states of Boolean variables.
Use the Boolean data type to contain two-state values such as true/false, yes/no, or on/off.
The default value of Boolean is False.

Type Conversions

When Visual Basic converts numeric data type values to Boolean, 0 becomes False and all other values become True. When Visual Basic converts Boolean values to numeric types, False becomes 0 and True becomes -1.

When you convert between Boolean values and numeric data types, keep in mind that the .NET Framework conversion methods do not always produce the same results as the Visual Basic conversion keywords. This is because the Visual Basic conversion retains behavior compatible with previous versions. For more information, see Troubleshooting Data Types.

Programming Tips
  • Negative Numbers. Boolean is not a numeric type and cannot represent a negative value. In any case, you should not use Boolean to hold numeric values.
  • Type Characters. Boolean has no literal type character or identifier type character.
  • Framework Type. The corresponding type in the .NET Framework is the System.Boolean structure.

Example
In the following example, runningVB is a Boolean variable, which stores a simple yes/no setting.


Visual Basic
1
2
3
4
5
Dim runningVB As Boolean
' Check to see if program is running on Visual Basic engine.
If scriptEngine = "VB" Then
    runningVB = True
End If
http://msdn.microsoft.com/en-u... 80%29.aspx


Добавлено через 1 минуту
а про
Цитата Сообщение от chopp Посмотреть сообщение
Abs
здесь почитай Краткие описания основных функций и команд VB
как раз для тебя

Цитата Сообщение от chopp Посмотреть сообщение
про такой не слышал
ну я тож много про чо не слышал

Цитата Сообщение от chopp Посмотреть сообщение
можно ли его заменить на тот же integer?
можно, но меняй без меня
1
0 / 0 / 0
Регистрация: 17.12.2009
Сообщений: 6
17.12.2009, 02:25  [ТС]
Ладно спасибо большое =)
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
17.12.2009, 02:25
Помогаю со студенческими работами здесь

Построить массив, каждый элемент - разность между данным числом и средним арифметическим каждой строки матрицы
2.Дана прямоугольная матрица и произвольное число. Построить массив, каждый элемент которого есть разность между этим числом и средним...

Найти в файле все строки-омонимы; подсчитать в каждой строке число символов, совпадающих с заданным
Подскажи команду для извлечения i-ой строки из файл, пожалуйста. А вообще задание такое: Написать shell-процедуру,которая: в заданном...

Сравнить все числа относительно главной диагонали матрицы
у меня дан квадратный двумерный массив, и мне надо сравнить все числа относительно главной диагонали, вот часть кода, здесь я именно...

Заменить все элементы матрицы, меньшие заданного числа, этим числом
Дана последовательность целых чисел. Заменить все элементы, меньшие заданного числа, этим числом. для двумерного массива

Все элементы каждой строки матрицы поделить на максимальный по модулю элемент этой строки
Нормировать матрицу так, чтоб все элементы каждой строки матрицы были поделены на максимальный по модулю элемент этой строки. Реализовать в...


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

Или воспользуйтесь поиском по форуму:
7
Ответ Создать тему
Новые блоги и статьи
Символьное дифференцирование
igorrr37 13.02.2026
/ * Программа принимает математическое выражение в виде строки и выдаёт его производную в виде строки и вычисляет значение производной при заданном х Логарифм записывается как: (x-2)log(x^2+2) -. . .
Камера Toupcam IUA500KMA
Eddy_Em 12.02.2026
Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .
И ясному Солнцу
zbw 12.02.2026
И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.
«Знание-Сила»
zbw 12.02.2026
«Знание-Сила» «Время-Деньги» «Деньги -Пуля»
SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров
8Observer8 12.02.2026
Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image)
8Observer8 11.02.2026
Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL3_image
8Observer8 10.02.2026
Содержание блога Библиотека SDL3_image содержит инструменты для расширенной работы с изображениями. Пошагово создадим проект для загрузки изображения формата PNG с альфа-каналом (с прозрачным. . .
Установка Qt-версии Lazarus IDE в Debian Trixie Xfce
volvo 10.02.2026
В общем, достали меня глюки IDE Лазаруса, собранной с использованием набора виджетов Gtk2 (конкретно: если набирать текст в редакторе и вызвать подсказку через Ctrl+Space, то после закрытия окошка. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru