Псевдографика в паскале: сделать таблицу цветов, название цвета, напротив его цвет

@kirill6919 · Регистрация: 30.06.2013

Author24 — интернет-сервис помощи студентам

1 задание надо сделать таблицу цветов , название цвета напротив его цвет .
Не могу сделать , не получается .

Kodzaev · 30.06.2013, 23:51

Типа этого?

Pascal

Uses crt;
Const
  col: Array [1..15] of String[16] =
  ('Blue','Green','Cyan','Red',
   'Magenta','Brown','LightGray','DarkGray',
   'LightBlue','LightGreen','LightCyan','LightRed',
   'LightMagenta','Yellow','White');
Var
  i: Byte;
BEGIN
Clrscr;
For i:=1 to 15 do
begin
  TextColor(i);
  Writeln('XXXXX - ',col[i]);
end;
Readln
END.

Черного цвета нет, т.к. он будет невидим.

@kirill6919 · 30.06.2013, 23:53 **[ТС]**

да, спасибо , мне этого будет достаточно.

@kirill6919 0 / 0 / 0 Регистрация: 30.06.2013 Сообщений: 7
		1
	Псевдографика в паскале: сделать таблицу цветов, название цвета, напротив его цвет 30.06.2013, 22:22. Показов 2193. Ответов 2 Метки нет (Все метки) 1 задание надо сделать таблицу цветов , название цвета напротив его цвет . Не могу сделать , не получается . 0

@kirill6919 0 / 0 / 0 Регистрация: 30.06.2013 Сообщений: 7
	30.06.2013, 23:53 [ТС]	3
	да, спасибо , мне этого будет достаточно. 0

Опции темы

Псевдографика в паскале: сделать таблицу цветов, название цвета, напротив его цвет

Решение