Как обойтись без модуля crt?

[Artsiom]

День добрый.
Интересует вопрос, как можно вывести красиво 2мерный массив в консольном приложении без модуля crt?
a[1,1]= 1 a[1,2]= 45 a[1,3]= 4
a[2,1]= 4 a[2,2]= 56 a[2,3]= 67
и т.п. далее.
Может можно даже с разным цветом?

[Вадим Мошев]

for i:=1 to n do
	begin
		for j:=1 to m do
			write('A[', i, ', ', j, ']=', a[i, j]);
			
		writeLn;
	end;

ЗЫ Для того чтобы вывести массив таким образом, модуль CRT не нужен вообще.

[Mad_Cat]

write(' A[', i, ', ', j, ']=', a[i, j]:6);// чтобы колонки не ехали

[Artsiom]

Ну ё моё.

Спасибо.

[Вадим Мошев]

Кстати, а вот для цвета-таки придётся использовать CRT.
Процедура SetColor(<число от 0 до 15>).
Иного способа не знаю

[Poma][a]

Иного способа не знаю

Графический модуль и самому рисовать

[Stilet]

Иного способа не знаю

Использовать SetConsoleTextAttribute() если это винда.

[s-andriano]

Сообщение от Вадим Мошев

Кстати, а вот для цвета-таки придётся использовать CRT.
Процедура SetColor(<число от 0 до 15>).
Иного способа не знаю

Обычно это делается прямой записью в видеопамять - там под символ отводится 2 байта:
4 бита - цвет символа,
2 бита - цвет фона,
1 бит - признак мерцания,
8 бит - код символа.

[Arigato]

Тогда уж так:

for i:=1 to n do
	begin
		for j:=1 to m do
			write(a[i, j]:6);
		writeLn;
	end;

[Vapaamies]

Сообщение от s-andriano

прямой записью в видеопамять

Вы тему перепутали, тут про консольные приложения речь.