close all;
clear all;
clc;

A =[
1 0 0 0 0 0 0 0 0 0
1 1 1 0 0 0 0 0 0 0
0 0 1 1 1 1 1 0 0 0
0 0 0 0 1 0 1 1 1 0
0 0 0 0 1 0 0 0 0 1
0 0 0 0 1 0 1 1 1 0
0 0 0 0 1 1 1 0 0 0
0 0 1 1 1 0 0 0 0 0
1 1 1 0 0 0 0 0 0 0
1 0 0 0 0 0 0 0 0 0 ]';
B =[
0 0 0 0 0 0 0 0 0 0
0 0 0 0 0 0 0 0 0 0
1 1 1 1 1 1 1 1 1 1
1 0 0 0 1 1 0 0 0 1
1 0 0 0 1 1 0 0 0 1
1 0 0 0 1 1 0 0 0 1
1 0 0 0 1 0 1 0 1 0
0 1 1 1 0 0 1 1 1 0
0 0 0 0 0 0 0 0 0 0
0 0 0 0 0 0 0 0 0 0 ]';
C =[
0 0 0 0 0 0 0 0 0 0
0 0 1 1 1 1 1 1 0 0
0 1 0 0 0 0 0 0 1 0
1 0 0 0 0 0 0 0 0 1
1 0 0 0 0 0 0 0 0 1
1 0 0 0 0 0 0 0 0 1
0 1 0 0 0 0 0 0 1 0
0 0 1 1 0 0 1 1 0 0
0 0 0 0 0 0 0 0 0 0
0 0 0 0 0 0 0 0 0 0 ]';
D=[
0 0 0 0 0 0 0 0 0 0
0 0 0 0 0 0 0 0 0 0
1 1 1 1 1 1 1 1 1 1
1 0 0 0 0 0 0 0 0 1
1 0 0 0 0 0 0 0 0 1
1 0 0 0 0 0 0 0 0 1
0 1 0 0 0 0 0 0 1 0
0 0 1 0 0 0 0 1 0 0
0 0 1 1 1 1 1 1 0 0
0 0 0 0 0 0 0 0 0 0
0 0 0 0 0 0 0 0 0 0 ]';

WZZ = [A B C D];
ilosc_znakow=7;
X=A;
g = zeros([1,ilosc_znakow])
for i = 1:1:ilosc_znakow
    g(i) = 2*WZZ(:,i)'*X - WZZ(:,i)'*WZZ(:,i)
end
[nmax, ind] = max(g)
ind