Форум программистов, компьютерный форум, киберфорум
Наши страницы

Pascal ABC

Войти
Регистрация
Восстановить пароль
 
Vlad2606
0 / 0 / 0
Регистрация: 24.06.2014
Сообщений: 11
#1

Реализовать следующий алгоритм работы светофора: зелёный, жёлтый, красный - Pascal ABC

25.06.2014, 02:33. Просмотров 849. Ответов 1
Метки нет (Все метки)

Составить программу , которая бы реализовала следующий алгоритм работы светофора. 1-зелёный, 2-жёлтый, 3-красный. Названия цветов выделите соответствующим цветом.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
25.06.2014, 02:33
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Реализовать следующий алгоритм работы светофора: зелёный, жёлтый, красный (Pascal ABC):

Что определяет для массива X[1..n, 1..m] следующий алгоритм? - Pascal ABC
по мере ваших ответов, буду выкладывать следующий вопрос и варианты ответов к нему . Буду очень благодарен и всем рад ) и так вопрос...

Красный свет светофора горит 40 секунд, зелёный - 20, какой объём информации несёт каждый из них - Информатика
Красный свет светофора горит 40 секунд, зелёный - 20, какой объём информации несёт каждый из них

Реализовать следующий алгоритм - Lisp
Доброй ночи. Вот такая задача. С помощью предложения PROGN реализовать следующий алгоритм: переменная n1 связана с суммой двух целых...

Нужно реализовать следующий алгоритм - ActionScript
Товарищи! Помогите реализовать следующий алгоритм: 1. Создается MovieClip. 2. В него, в определенные поля, подгружаются данные из...

Связать Shape1(Круг желтого цвета) с RadioGroup в радиогруп - выбор цвета Этого круга(Shape1) - Красный, Синий, Зелёный. - Delphi
with Shape1 do case RadioGroup2.ItemIndex of 0:Shape1.TShape:= clLime 1:Font.Color := clLime; 2:Font.Color := clLime; end;

Эмуляция работы светофора - Delphi

1
Puporev
Модератор
52400 / 40247 / 13581
Регистрация: 18.05.2008
Сообщений: 93,037
25.06.2014, 13:38 #2
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
uses crt;
var k:char;
begin
repeat
textcolor(0);
clrscr;
writeln('Выберите цвет 1-зелёный, 2-жёлтый, 3-красный другое-выход');
readln(k);
clrscr;
case k of
'1':begin
    textcolor(2);
    write('зеленый');
    readln
    end;
'2':begin
    textcolor(14);
    write('желтый');
    readln
    end;
'3':begin
    textcolor(12);
    write('красный');
    readln
    end;
 else exit;
end;
until not(k in ['1'..'3']);
end.
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
25.06.2014, 13:38
Привет! Вот еще темы с ответами:

Файл: Реализовать алгоритм работы чат-бота... - C#
Всем привет! Задача такова: - Пользователя просят написать слово, например "Привет" - программа ищет в текстовом файле с кучей текста...

Эмуляция работы светофора в консольном приложении - C++
Всем привет! Давно читал ваш форум и находил множество решений в Delphi. Но решил двигаться дальше и начал изучать C++ и решил вопросы...

Реализовать алгоритм работы с динамической структурой данных – однонаправленный список - C++
Нужно срочно решение задачки!! Помогите, кто может!!!! Реализовать алгоритм работы с динамической структурой данных – однонаправленный...

Реализовать алгоритм работы с динамической структурой данных – однонаправленный список - C (СИ)
Друзья помогите пожалуйста написать прогу..... Необходимо организовать список, при этом необходимо написать программу таким образом,...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru