Vladimir_S спасибо вам что откликнулись на мою просьбу о помощи побольше бы таких понимающих специалистов..но я не совсем понял что там должно быть после a:array[1..6,1..6] of integer= просто мы в универе делали через процедуры и ввод и вывод массива..в файл результата..