сервис вопросов и ответовпомогите составить программу светофор в pascalABC
5-9 класс|
|
VimavAramis
20 июня 2014 г., 10:20:18 (9 лет назад)
Sashapopkov02
20 июня 2014 г., 12:04:35 (9 лет назад)
uses graphabc,crt;
var i:integer; h:real;
begin
randomize;
rectangle(280,130,320,320);
rectangle(250,10,350,260);
circle(300,55,35);
circle(300,135,35);
circle(300,215,35);
for i:=1 to 1000 do
begin
floodfill(300,55,clred);
delay(3000);
floodfill(300,55,clwhite);
delay(1000);
floodfill(300,135,clyellow);
delay(3000);
floodfill(300,135,clwhite);
delay(1000);
floodfill(300,215,clgreen);
delay(1000);
floodfill(300,215,clwhite);
delay(1000);
end;
end.
Ответить
Другие вопросы из категории
Для чего используются команды цикла? Как записывается команда цикла FOR? Как в цикле записать команду присваивания, чтобы она вычисляла сумму чисел?
Количество? Какое начальное значение должно быть у переменной, в которой накапливаем произведение чисел? Как записывается команда цикла, в которой счетчик цикла уменьшается? Можно ли изменять значение верхней границы цикла в теле цикла? Можно ли в теле цикла использовать команду сравнения
Некоторый алгоритм из одной цепочки символов получает новую цепочку
следующим образом. Сначала записывается исходная цепочка символов, после нее
записывается исходная цепочка символов в обратном порядке, затем записывается
буква, следующая в русском алфавите за той буквой, которая в исходной цепочке
стояла на первом месте. Получившаяся цепочка является результатом работы
алгоритма. Например, если исходная цепочка символов была ЛЕС, то результатом
работы алгоритма будет цепочка ЛЕССЕЛМ. Дана цепочка символов ГО. Какая
цепочка символов получится, если к данной цепочке применить алгоритм дважды (то
есть к данной цепочке применить алгоритм, а затем к результату его работы еще раз
применить алгоритм)?
Читайте также
Помогите составить программу по информатике в Pascal ABC. Задание 1. С клавиатуры одной строковой вводят имя и фамилию. Составьте программу, которая:
а) определяет, есть ли в определенной строке заданный символ; б) копирует в новую строку имя и выводит его; в) выводит сначала фамилию, а затем имя. Задание 2. Составьте программу, которая в строке "Касіу Ясь канюшыну" заменяет имя "Ясь" на "Янка". Задание 3. Составьте программу, которая в строке "реки горы и болота": а) удаляет слово "горы"; б) Заменяет слово "болота" на "озера". Буду безмерно благодарна!!!
Помогите составить программу по информатике в Pascal ABC. Задание 1. С клавиатуры одной строковой вводят имя и фамилию. Составьте программу, которая: а)
определяет, есть ли в определенной строке заданный символ; б) копирует в новую строку имя и выводит его; в) выводит сначала фамилию, а затем имя. Задание 2. Составьте программу, которая в строке "Касіу Ясь канюшыну" заменяет имя "Ясь" на...
Помогите составить программу по Паскалю, пожалуйста.
Клоун
предложил каждому из публики задумать число. Потом он сказал: «Прибавьте к
задуманному числу 5. Теперь из результата вычтите 2. А теперь к результату
прибавьте 7». Потом клоун спросил у желающих, какое число у каждого из них
получилось. Услышав ответ, он немедленно объявлял каждому, какое число тот
задумывал. Составьте программу, которая повторяла бы фокус клоуна.
мне ооочень срочно нужно!!! пожалуйста помогите!!!!!!!!помогите решить 2 задачи по Ивт в Паскале: 1)составить программу вычисления в массиве A(
N) произведения нечетных элементов 2)Составьте программу вычисления в массиве B(N) максимального среди отрицательных элементов и его номера. заранее огромное спасибо! очень нужно!
Очень срочно, и очень нужно составить программы по информатике PASCAL ABC, помогите, пожалуйста от этих программ зависит моя четвертная.
1. Составьте программу для определения большего из двух чисел х или у
2. Составьте программу для нахождения площади прямоугольника по заданным сторонам а и б
Вы находитесь на странице вопроса "помогите составить программу светофор в pascalABC", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.