Цитата:
	
	
		| 
			
				 Сообщение от MarlboroRed 
				в цикле "for to do" блок "begin end" используется только в случае, если в цикле выполняется 2 и более операций. 
			
		 | 
	
	
 
не ври, его использование ничем не ограничено и может использоваться тупо для улучшения читаемости кода 
	Цитата:
	
	
		| 
			
				 Сообщение от Guneska 
				Если я убираю begin после каждого цикла, то все цифры просто выстраиваются в вертикальный ряд. "матрицы А и В пустые. Их нужно заполнить исходными данными" --- а куда, в какое место в коде вводить эти данные? 
			
		 | 
	
	
 
ибо Write и WriteLn немного различаются 
 
вводить хоть сразу в описании переменной в круглых скобках если они фиксированы
	Код:
	arr:array[1..4, 1..3] of integer = ((1,-1,3), (0,0,0), (1,4,0), (4,-1,-1));
 
 
 либо так же в цикле через Read и\или Readln