Помощь - Поиск - Пользователи - Календарь
Полная версия: Матрица с цифровой информацией
Форум «Всё о Паскале» > Pascal, Object Pascal > Задачи
-Nemesis-
Вводиться матрица МАТР(n,n) с цифровой информацией. Составить программу подсчета сумм элементов, составляющих "черные", и, отдельно "белые" поля предполагаемой шахматной доски, наложенной на матрицу.


Исходную матрицу и результатные суммы вывести на экран дисплея.



Lapp
sw:=0;
sb:=0;
for i:=1 to n do for j:=1 to n do if Odd(i+j) then sw:=sw+MATP[i,j] else sb:=sb+MATP[i,j];
Ozzя
 for i:=1 to n do
for j:=1 to n do
if odd(i+j-1) then
s1:=s1+a[i,j]
else
s2:=s2+a[i,j];
Гость
И че с этим делать?
Ozzя
Цитата(Гость @ 6.12.2007 14:30) *

И че с этим делать?

Цитата
подсчета сумм элементов, составляющих "черные", и, отдельно "белые" поля предполагаемой шахматной доски, наложенной на матрицу

Тебе решили. norespect.gif
И еще спрашиваешь, че делать? nea.gif
Lapp
Судя по тому, как ты назвался, можно предположить, что ты любишь головоломки (аллюзия на Nemesis Game). Ну, что ж - вперед, к разгадке! smile.gif))
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.