Задать два перечислимых типа: первый - коды цветов, второй - названия цветов

@alfee · Регистрация: 12.12.2014

Задать два перечислимых типа: первый коды цветов, второй - названия цветов. Вводится имя цвета, выводится его тип.

Помогите плз, ломаю голову не могу понять как сделать

@ZX Spectrum-128 · 31.03.2015, 18:55

Сообщение от alfee

Вводится имя цвета, выводится его тип.

Написал как понял.

Pascal

type
  colorcode = (colorcode1,colorcode2,colorcode3);
  colorname = (red,green,blue);
var
  f: string;
begin
  readln(f);
  if f = 'red' then
    writeln(red)
  else
    if f = 'green'  then
      writeln(green)
    else
      if f = 'blue' then
        writeln(blue);
  readln;
end.

@alfee 0 / 0 / 0 Регистрация: 12.12.2014 Сообщений: 11
		1
	Задать два перечислимых типа: первый - коды цветов, второй - названия цветов 31.03.2015, 16:08. Просмотров 1785. Ответов 1 Метки нет (Все метки) Задать два перечислимых типа: первый коды цветов, второй - названия цветов. Вводится имя цвета, выводится его тип. Помогите плз, ломаю голову не могу понять как сделать 0

Опции темы

Задать два перечислимых типа: первый - коды цветов, второй - названия цветов

Решение