% Solution test 2008 A
%  Part A
%q1
% D =
%
%     7     0     0
%     0     5     0
%     0     0     3

%q2
% F =
%
%     0     0     1     1     1     0     0     1
% -----------------------------------------------------------------------------------------
% Part B
% Q1 solution 
function [vsum , r] = f1(A)
% usage: [vsum   r] = f1(A)  
% input example
% A = [1 2 3 4;  4 5 6 7;  9 10 11 12;  20 14 15 16]

[N,N] = size(A);

d = diag(A);
sd = sum(d)

vsum = sum(A);
b = vsum>sd;   % create vector of logical values
count = sum(b);

%        another option:
% count=0
% for i=1:N
%     if vs(i)>sd
%         count = count + 1;
%     end
% end

if (count>N/2)
    r = 1;
elseif count<N/2
    r = -1;
else
    r = 0;
end

% Q2 Solution
function [ R ] = randMat(N,k)
 R = fix( rand(N)*k + 1);
end

% ----------------------------------------------------

% Part 3
% a.   12
% b.   The function returns the difference between the maximum number in matrix A
%        and the minimum number in matrix A. In other words, it returns the range.