Нужна программа, которая будет выводить текст разными цветами, или хотя бы скажите команду которая меняет цвет текста, спасибо)

бля слов нет просто из деревни?или гугл не знаешь?

program test;
uses crt;
begin
ClrScr;
TextBackGround (black);
TextColor (red);
Gotoxy (15,15);
readln (N)
writeln (N);
readln;
end.


такое будет работать?

[Error] Project1.dpr(5): Undeclared identifier: 'textcolor' вот что пише, когда пытаюсь скомпилить

program test;
var N:text;
begin
readln (N);
textcolor(black);
writeln('N');
readln;
end.

А на хрена ты его в Delphi компилируешь? :D Это программа для DOS'овского Turbo Pascal. :)

А еще ты забыл:
там описание процедуры textcolor.

USES Crt перед var
используй RANDIMIZE для случайности случайностей

uses crt;
var i:integer;
begin clrscr;
for i:=1 to 1000 do
begin
writeln('Чему вас только учат в школе?');
end;
readkey;
end.

ну так это, у меня тетрадь по Информатике с 2006 года, и с тех пор повторяются записи про:
1. перевод чисел из одной системы счисления в другую
2. азы exel
3. азы PowerPoint
4. немного веб верстки.

серьезно, могу показать практически идентичные записи от 2006 и 2010 года)