Организовать ввод элементов двумерного массива из текстового файла

@123Ruslan123 · Регистрация: 21.09.2014

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

Помогите переделать программу под эти задания.
задание:
1.Организовать ввод элементов двумерного массива размерностью N*M из текстового файла(открытие файла через объекты DriveListBox,DirListBox,FileListBox)
2.Вывести исходный массив в таблицу MSFlexGrid.
3.Определить суммы отрицательных элементов по столбцам.
4.Найти квадрат произведения максимального элемента массива и элемента с индексом (L,K).
5.Удалить столбцы, в которых есть хотя бы один отрицательный элемент, кратный 4.

флекс.rar

@123Ruslan123 · 27.09.2014, 12:40 **[ТС]**

Помогитеее, пожалуйста

@Alex77755 · 27.09.2014, 18:51

Начинайтеее, пожалуйстааа!
помоожеееееем!
Делаааать ззза вааааааас неее буууудееемм!

@123Ruslan123 · 28.09.2014, 16:15 **[ТС]**

Определить суммы отрицательных элементов по столбцам.
Как?)

@Alex77755 · 28.09.2014, 16:45

Сумма определяется методом сложения

Добавлено через 1 минуту
Отрицательные значит меньше 0.
Проверяется оператором <

@123Ruslan123 · 28.09.2014, 17:27 **[ТС]**

Как её найти в этом именно файле.
Если делать через объекты DriveListBox,DirListBox,FileListBox, то :

Visual Basic

Private Sub Command2_Click()
File = Text1
n = Val(Text2)
m = Val(Text3)
For i = 1 To n
proizv = 1
For j = 1 To m
If B(i, j) < 0 Then proizv = proizv * B(i, j)
Next j
If proizv <> 1 Then Label9.Caption = Label9.Caption & "Строка- " & i & " = " & proizv & vbCrLf
If proizv = 1 Then Label9.Caption = Label9.Caption & "Строка- " & i & " = " & 0 & vbCrLf
Next i
End Sub

А как сделать это в этом файле?

SoftIce · 28.09.2014, 17:44

В конце той темы, в которой ты взял прикрепленный к первому сообщению проект, есть почти готовое решение с использованием DriveListBox,DirListBox,FileListBox. Сил не хватило дочитать тему до конца?

@123Ruslan123 · 30.09.2014, 16:51 **[ТС]**

Visual Basic

Private Sub Command2_Click()
File = Text1
n = Val(Text2)
m = Val(Text3)
For i = 1 To n
summ = 1
For j = 1 To m
If B(i, j) < 0 Then summ = summ + B(i, j)
Next j
If summ <> 1 Then Label9.Caption = Label9.Caption & "Ñòðîêà- " & i & " = " & summ & vbCrLf
If summ = 1 Then Label9.Caption = Label9.Caption & "Ñòðîêà- " & i & " = " & 0 & vbCrLf
Next i
End Sub

Здесь идет расчет по строкам, как сделать по столбцам сумму отриц. элементов?

@123Ruslan123 0 / 0 / 0 Регистрация: 21.09.2014 Сообщений: 5
		1
	Организовать ввод элементов двумерного массива из текстового файла 21.09.2014, 14:58. Показов 2343. Ответов 7 Метки нет (Все метки) Помогите переделать программу под эти задания. задание: 1.Организовать ввод элементов двумерного массива размерностью N*M из текстового файла(открытие файла через объекты DriveListBox,DirListBox,FileListBox) 2.Вывести исходный массив в таблицу MSFlexGrid. 3.Определить суммы отрицательных элементов по столбцам. 4.Найти квадрат произведения максимального элемента массива и элемента с индексом (L,K). 5.Удалить столбцы, в которых есть хотя бы один отрицательный элемент, кратный 4. флекс.rar 0

@123Ruslan123 0 / 0 / 0 Регистрация: 21.09.2014 Сообщений: 5
	27.09.2014, 12:40 [ТС]	2
	Помогитеее, пожалуйста 0

@Alex77755 11508 / 3794 / 681 Регистрация: 13.02.2009 Сообщений: 11,197
	27.09.2014, 18:51	3
	Начинайтеее, пожалуйстааа! помоожеееееем! Делаааать ззза вааааааас неее буууудееемм! 0

@123Ruslan123 0 / 0 / 0 Регистрация: 21.09.2014 Сообщений: 5
	28.09.2014, 16:15 [ТС]	4
	Определить суммы отрицательных элементов по столбцам. Как?) 0

@Alex77755 11508 / 3794 / 681 Регистрация: 13.02.2009 Сообщений: 11,197
	28.09.2014, 16:45	5
	Сумма определяется методом сложения Добавлено через 1 минуту Отрицательные значит меньше 0. Проверяется оператором < 0

SoftIce es geht mir gut 11270 / 4752 / 1183 Регистрация: 27.07.2011 Сообщений: 11,439
	28.09.2014, 17:44	7
	Сообщение было отмечено The trick как решение Решение В конце той темы, в которой ты взял прикрепленный к первому сообщению проект, есть почти готовое решение с использованием DriveListBox,DirListBox,FileListBox. Сил не хватило дочитать тему до конца? 0

	30.09.2014, 16:51

Организовать ввод элементов двумерного массива из текстового файла

Решение