aa1_example1

function [B, message]  = diavasma3(A)

%eksetash an antistrefetai o pinakas
[m,n] = size(A);
if m == n %tetragonikos
    B = inv(A);
else % mh tetragonikos
    B = ones(m,n);
end

message = sprintf('o pinakas exei %d grammes kai %d sthles \n' , m,n); 

end