Задание номер 3! ЛАЗАРУС. помогите пожалуйста! Фото с заданием ВНУТРИ!!! Заранее спасибо!

var i,j:integer;a:array[1..6,1..10]of integer;beginfor i:=1 to 6 dofor j:=1 to 10 doa[i,j]:=(i-1)*10+j ;for i:=1 to 6 dobeginfor j:=1 to 10 dowrite(a[i,j]:4);writelnend;end.