![]() |
|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
![]() |
|
Опции темы | Поиск в этой теме |
![]() |
#1 |
Пользователь
Регистрация: 22.04.2009
Сообщений: 26
|
![]()
. Дана действительная квадратная матрица порядка n. Построить последовательность действительных чисел A1, A2, ..., An по следующему правилу: если i - тая строка матрицы упорядочена по возрастанию, то Ai равно 1; в противном случае Ai равно максимальному элементу строки, если в ней есть нулевые элементы, или минимальному если таких элементов нет.
Разработать и использовать в программе метод заполнения матрицы случайными числами от -15.0 до 35.0, метод вывода матрицы на печать, 2. Дан двумерный целочисленный массив. Упорядочить строки матрицы по убыванию количества нечетных элементов в строке. Сортировка методом выбора. Найти максимальный для всей матрицы элемент и номер строки и столбца, в котором он находится. Очень нужно Заранее спасибо |
![]() |
![]() |
![]() |
#2 |
Пользователь
Регистрация: 22.04.2009
Сообщений: 26
|
![]()
Люди помогите пожалуйста очень надо
Или может дайте алгоритмы поиска или ссылки на литературу где это можно найти |
![]() |
![]() |
![]() |
#3 |
В тени
Старожил
Регистрация: 19.12.2008
Сообщений: 5,788
|
![]()
Java не стоит. Алгоритм примерно такой (после заполнения матрицы).
Код:
Вполне очевидно, чтобы что-то понять, необходимо книги читать.
Не нужно плодить бессмысленных тем. Вас Поиск избавит от многих проблем. ___________________________________ ___________________________________ _______ [=Правила форума=]_____[Поиск]_____[Литература по С++]____[Литература. Паскаль] |
![]() |
![]() |
![]() |
#4 |
Пользователь
Регистрация: 22.04.2009
Сообщений: 26
|
![]()
А со второй Задачей не поможете?
|
![]() |
![]() |
![]() |
#5 |
В тени
Старожил
Регистрация: 19.12.2008
Сообщений: 5,788
|
![]()
По второй.
Будем писать количества нечетных элементов каждой строки в N-й столбец. С тем же успехом можно воспользоваться дополнительным массивом. Код:
Код:
Код:
Вполне очевидно, чтобы что-то понять, необходимо книги читать.
Не нужно плодить бессмысленных тем. Вас Поиск избавит от многих проблем. ___________________________________ ___________________________________ _______ [=Правила форума=]_____[Поиск]_____[Литература по С++]____[Литература. Паскаль] |
![]() |
![]() |
![]() |
#6 |
Пользователь
Регистрация: 22.04.2009
Сообщений: 26
|
![]()
Спасибо Большое
|
![]() |
![]() |
![]() |
#7 |
Регистрация: 23.11.2009
Сообщений: 5
|
![]()
помогите пожалуйста! написать тоже самое что во второй задаче только сортировка по возрастанию и на Delphi!
|
![]() |
![]() |
![]() |
#8 |
Регистрация: 23.11.2009
Сообщений: 5
|
![]()
вот что у меня получилось
Код HTML:
procedure TForm1.Button1Click(Sender: TObject); var a:array of array of integer; b:array of array of integer; p:array of integer; q:array of integer; m,n,i,j,h,min,y,z,k,x:integer; begin N:=StrToInt(Edit1.text); M:=StrToInt(edit2.text); StringGrid1.colcount:=n; StringGrid1.rowcount:=m; StringGrid2.colcount:=n; StringGrid2.rowcount:=m; SetLength(a,n,m); SetLength(b,n,m); SetLength(p,n); SetLength(q,n); for I := 0 to N-1 do for j := 0 to M-1 do A[i,j]:=random(40); for I := 0 to N-1 do for j := 0 to M-1 do StringGrid1.Cells[j,i]:=IntToStr (a[i,j]); for I := 0 to N-1 do begin k:=0; for j := 0 to M-1 do if A[i,j]mod 2 = 1 then k:=k+1; p[i]:=k; q[i]:=i; end; for h := 1 to N - 1 do begin min:=q[h]; x:=h+1; for i := x to N do if min>p[i] then begin y:=min; min:=p[i]; p[i]:=y; z:=q[h]; q[h]:=q[i]; q[i]:=z; end; end; for h := 0 to n-1 do for i := 0 to n-1 do for j := 0 to m-1 do B[i,j]:=a[q[h],j]; for i := 0 to n-1 do for j := 0 to m-1 do stringgrid2.cells[j,i]:=IntToStr(B[i,j]); end; end. Последний раз редактировалось F@got; 13.12.2009 в 18:25. |
![]() |
![]() |
![]() |
![]() |
||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
помогите с задачами | щдуп | Паскаль, Turbo Pascal, PascalABC.NET | 1 | 26.06.2008 18:39 |
Помогите с задачами. | GodsAndGlory | Общие вопросы C/C++ | 1 | 26.05.2008 19:01 |