IPB
ЛогинПароль:

> Прочтите прежде чем задавать вопрос!

1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!

> Задача по двумерным массивам, Ничего не получается, помогите!
сообщение
Сообщение #1





Группа: Пользователи
Сообщений: 8
Пол: Мужской
Реальное имя: Игорь

Репутация: -  0  +


Вот задача:
Вычислить сумму элементов любой строки двумерного массива А[m,n], стоящих на четных местах. M=3, n=7. Вывести исходный массив А, номер строки, исходную сумму и рассматриваемую строку, в которой все подходящие элементы заменены нулями.

Позарез нужно сделать ее, пропаду, если не сдам ее!
У меня никак не получается сделать ее как надо, подскажите если кто знает, очень благодарен буду. Ниже выкладываю свою версию решения, подправьте что не так.

 
Var A:array[1..50,1..70] of real;
I,j,m,n:integer;
Begin
Writeln(‘vvedite chislo strok m i stolbcov n’);
Readln(m,n);
Writeln(‘vvedite elementi massiva A po strokam’);
For i:=1 to m do
For j:=1 to n do readln(A[I,j]);
Writeln(‘ishodniy massiv A’);
For i:=1 to m do
Begin
For j:=1 to n do write (A[I,j]:7:1);
Writeln
end;


 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

Сообщений в этой теме
Игорь22   Задача по двумерным массивам   13.05.2007 20:02
мисс_граффити   тебе осталось сделать подсчет суммы... раз строка …   13.05.2007 20:25
Игорь22   Ой, спасибо огоромное за поддержку! И что так …   14.05.2007 1:19
мисс_граффити   :blink: я же написала, ЧТО тебе надо добавить. куд…   14.05.2007 2:15
Игорь22   я ввел все как ты написала и вот что получилось: …   14.05.2007 18:04
Beseech   Млин,ну прально канешь...Только можешь нулей помен…   14.05.2007 18:46
мисс_граффити   можешь исправить вывод суммы (чтобы столько нулей …   14.05.2007 23:20
Игорь22   А я и сам не знаю где строки а где столбцы, наверн…   15.05.2007 17:13
мисс_граффити   поищи по форуму, выкладывали программки, которые р…   15.05.2007 19:37
Игорь22   Я и не знал, что такие проги есть:) вводишь код и…   15.05.2007 23:26
Игорь22   Может все-таки кто сможет помочь, край нужна схема…   18.05.2007 21:28
Tan   Программа avtoshema в помощь тебе, о ней уже писал…   18.05.2007 23:34
Игорь22   Спасибо!!!   20.05.2007 19:08


 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 





- Текстовая версия 28.01.2022 14:44
500Gb HDD, 6Gb RAM, 2 Cores, 7 EUR в месяц — такие хостинги правда бывают
Связь с администрацией: bu_gen в домене octagram.name