for j:=1 to 7 do
begin
xk[j]:=false;
for i:=1 to 4 do
xk[j]:=xk[j] or (x and q[i,j]);
end;
Умножение логических матриц
Здрасьте, помогите пожалуйста с решением одной задачки.
Нужно одну программку написать, на паскале.
Там вот, суть проблемы в том, что у меня есть две матрицы из логических элементов(boolean), 1х4 и 4х7(хотя это не столь важно). И их нужно как-то умножить. Паскаль не хочет применять к логических элементам обычные действия вроде "+" или "*", потому и возникли трудности. Не знаю, может у меня руки не оттуда растут, или я неправильно думаю, но конечный результат сходиться никак не желает.
И еще у меня есть табличка для проверки результата, вот.
Если кому интересно, это нужно для того чтобы образовать код Хемминга. А сама программа в итоге будет считать, сколько и каких ошибок можно будет выявить при определенной степени избыточности информации.
Заранее спасибо.
Нужно одну программку написать, на паскале.
Там вот, суть проблемы в том, что у меня есть две матрицы из логических элементов(boolean), 1х4 и 4х7(хотя это не столь важно). И их нужно как-то умножить. Паскаль не хочет применять к логических элементам обычные действия вроде "+" или "*", потому и возникли трудности. Не знаю, может у меня руки не оттуда растут, или я неправильно думаю, но конечный результат сходиться никак не желает.
И еще у меня есть табличка для проверки результата, вот.
Если кому интересно, это нужно для того чтобы образовать код Хемминга. А сама программа в итоге будет считать, сколько и каких ошибок можно будет выявить при определенной степени избыточности информации.
Заранее спасибо.
Простая замена '+' на 'or', а '*' на 'and' не сработает разве?
Цитата: Norgat
Простая замена '+' на 'or', а '*' на 'and' не сработает разве?
да как-то не очень оно работает
собственно, вот:
Код:
q - матрица 4*7 (та что на картинке по центру)
х - матрица 1*4 (та что на картинке слева)
хк - матрица 1*7(на картинке - справа)
у меня чего-то никак не сходится