Помощь - Поиск - Пользователи - Календарь
Полная версия: Задача про цвета радуги
Форум «Всё о Паскале» > Pascal, Object Pascal > Задачи
Lodar'
Порядок следования цветов радуги - красный оранжевый жетлый зеленый голубой синий и фиолетовый. Составить программу которая вводит тройку из указанных цветов в произвольном порядке, а потом печатает их же в порядке следования цветов в радуге:
Пример: Введены цвета: голубой желты й фиолетовый
Программа: желтый, холубой, филетовый.
Поможите?
Lodar'
я считаю что тут надо использовать перечислимый тип данных. Поможете реализовать?
amega
допустим взять масив

const
 Colors=7;
type
   Tmas=array[1..colors] of string[20];
const
  col:Tmas = (красный, оранжевый, жетлый, зеленый, голубой, синий,  фиолетовый);


потом вводим наши 3 цвета


writeln('color 1');
readln(a);
writeln('color 2');
readln(b);
writeln('color 3');
readln(c);



а потом по порядку масива


for i:=1 to 7 do 
if col[i]=a or col[i]=b  or col[i]=c then Write(col[i],' ' );



и оно по порядку будет писать цвета
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.