function [] = mymax(x)
%H sunartisi dexetai san orisma ena dianusma x kai epistrefei to
%megisto stoixeio tou dianusmatos x kai tin thesi tou
m=max(x);
s=find(x==m);
disp(['To megisto stoixeio tou dianusmatos exei timi: ',num2str(m)])
disp(['H thesi tou megistou stoixeiou mesa sto dianusma einai: ',num2str(s)])
end