Условие: Пользователь вводит фамилию и класс, программа должна вывести сообщение «Фамилия … - класс …».Вместо многоточия должны быть выведены соответствующие значе
ния.
Предусмотрите возможность вывода текста разными цветами (например, фамилия – синий, класс – красный)

Целая прога мне не надо, вот я сама написала, мне только надо чтобы в составе одной и той же строки строки фамилия выводилась одним цветом, а имя другим
Program z4;
Uses GraphABC;
var fam,klass,s:string;
begin
writeln ('Bведите фамилию');
readln(fam);
writeln('Bведите класс');
readln(klass);
s:='Фамилия -'+fam+', класс - '+klass;
writeln(s);
end.