crt функции

Ответ от Johnsilver[гуру]
ну нормально чо, что бы проверить твой опус надо его ручками перебить и посмотреть в каком месте какая функция дает ошибку. а так, что бы текст выложить, так что бы нет.. ну вот тебе пример из справочника, может тебе чем поможет
// Стандартные CRT-цвета
// Для запуска программы используйте Shift+F9 !!!
uses CRT;
begin
SetWindowTitle('Стандартные CRT-цвета');
for var i:=0 to 15 do
begin
TextBackground(i);
for var j:=0 to 15 do
begin
TextColor(j);
write(' CRT');
end;
writeln;
end;
HideCursor;
TextBackground(0);
TextColor(0);
end.

Ответ от Валентин[новичек]
Потому что в crt.pas
procedure Window(x, y, w, h: integer);
begin
writeln('Функция CRT.Window не реализована');
{Console.WindowLeft:=x;
Console.WindowTop:=y;
Console.WindowWidth:=w;
Console.WindowHeight:=h;}
end;

Ответ от 3 ответа[гуру]

Ответ от 3 ответа[гуру]