Задача по теме двумерные массивы, Помогите пожалуйста решить ЗАДАЧУ=) |
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
Задача по теме двумерные массивы, Помогите пожалуйста решить ЗАДАЧУ=) |
Диана |
Сообщение
#1
|
Гость |
Задан двумерный массив 4 на 4. Найти минимальный элемент каждого столбца и написать его в новый (одномерный) массив.
|
Гость |
Сообщение
#2
|
Гость |
|
Zzzz... |
Сообщение
#3
|
/// Группа: Пользователи Сообщений: 78 Пол: Мужской Реальное имя: Илья Репутация: 0 |
VAR
w,i,j,min:integer;
a:array[1..4,1..4] of integer;
q:array[1..20] of integer;
BEGIN
assign(input,'input.in');
reset(input);
for i:=1 to 4 do
begin
for j:=1 to 4 do
begin
read(a[i,j]);
end;
end;
for i:=1 to 4 do
begin
min:=20000;
for j:=1 to 4 do
begin
if min>a[j,i] then
begin
min:=a[j,i];
inc(w);
q[w]:=min;
end;
end;
end;
END.
|
renesko1 |
Сообщение
#4
|
поиск Группа: Пользователи Сообщений: 347 Пол: Мужской Реальное имя: nir Репутация: 2 |
Может я и придраюсь, но зачем новый массив делать размером 20 элементов ведь в итоге туда запис.
4 min элемента из 1 матрицы ? -------------------- typedef void Śūnyatā ;
|
Zzzz... |
Сообщение
#5
|
/// Группа: Пользователи Сообщений: 78 Пол: Мужской Реальное имя: Илья Репутация: 0 |
я всегда беру с запасом....привычка)..но по-мойму это не так много заберет памяти?
|
renesko1 |
Сообщение
#6
|
поиск Группа: Пользователи Сообщений: 347 Пол: Мужской Реальное имя: nir Репутация: 2 |
В принципе да, но зачем ?
(Типичная занудная фраза : представь что таких массивов милионны) -------------------- typedef void Śūnyatā ;
|
Диана |
Сообщение
#7
|
Гость |
Zzzz..., спасибо большое
|
Michael_Rybak |
Сообщение
#8
|
Michael_Rybak Группа: Пользователи Сообщений: 1 046 Пол: Мужской Реальное имя: Michael_Rybak Репутация: 32 |
Цитата я всегда беру с запасом....привычка)..но по-мойму это не так много заберет памяти? Цитата В принципе да, но зачем ? на олимпиадах это иногда спасает. конечно, головой лучше думать, но лишним не будет накинуть десяток элементов. |
klem4 |
Сообщение
#9
|
Perl. Just code it! Группа: Пользователи Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация: 44 |
Цитата на олимпиадах это иногда спасает. конечно, головой лучше думать, но лишним не будет накинуть десяток элементов. Это юмор такой или я чего-то недопонял ? -------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
|
Zzzz... |
Сообщение
#10
|
/// Группа: Пользователи Сообщений: 78 Пол: Мужской Реальное имя: Илья Репутация: 0 |
скорее всего этим хотели сказать если думать не хочешь ставь на максимум!)
Сообщение отредактировано: Zzzz... - |
klem4 |
Сообщение
#11
|
Perl. Just code it! Группа: Пользователи Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация: 44 |
оффтоп
в общем-то я уже понял, что с чувством юмора у меня туговато в последнее время) -------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
|
Michael_Rybak |
Сообщение
#12
|
Michael_Rybak Группа: Пользователи Сообщений: 1 046 Пол: Мужской Реальное имя: Michael_Rybak Репутация: 32 |
нет, это не юмор.
иногда бывает, что не учел, что там на один элемент больше нужно было зарезервировать, потому что, скажем, нумерация с единицы, а не с нуля. вот я говорю, что лучше, конечно, думать головой, но на всякий случай можно перестраховаться. что я всегда и делаю. |
Zzzz... |
Сообщение
#13
|
/// Группа: Пользователи Сообщений: 78 Пол: Мужской Реальное имя: Илья Репутация: 0 |
народ может кто-нить купит лодку,а?...че-то уже сплошной офф пошел...
|
Michael_Rybak |
Сообщение
#14
|
Michael_Rybak Группа: Пользователи Сообщений: 1 046 Пол: Мужской Реальное имя: Michael_Rybak Репутация: 32 |
у нас офф, у тебя флуд ;) кто захочет - ответит в любом случае.
|
renesko1 |
Сообщение
#15
|
поиск Группа: Пользователи Сообщений: 347 Пол: Мужской Реальное имя: nir Репутация: 2 |
Молчание золото ( )
Сообщение отредактировано: renesko1 - -------------------- typedef void Śūnyatā ;
|
Текстовая версия | 14.01.2025 5:31 |