сервис вопросов и ответовPascal составить прграмму .
10-11 класс|
|
Работа светофора запрограммирована таким образом : в начале каждого часа 3 минуты горит зелёный свет , затем 2 минуты красный , затем 3 минуты зелёный и т.д . Дано время t в минутах от начала часа . Определить сигнал какого цвета горит в этот момент времени для пешехода .
насте65
22 апр. 2013 г., 7:00:55 (10 лет назад)
ShakirovaTK
22 апр. 2013 г., 8:54:24 (10 лет назад)
var a:integer;
begin
writeln('Введите время (в минутах)');
readln(a);
if ((a mod 10>=0)and(a mod 10< 3))or((a mod 10>=5)and(a mod 10< 8)) then writeln('Зелёный')
else writeln('Красный');
readln
end.
Ответить
Другие вопросы из категории
Предприятие выпускает четыре вида продукции и использует три типа основного оборудования: токарное, фрезерное и шлифовальное. Затраты времени на
изготовление единицы продукции для каждого из типов оборудования приведены в таблице. В ней же указаны общий фонд рабочего времени каждого из типов оборудования, а также прибыль от реализации одного изделия данного вида. Определить такой объем выпуска каждого из изделий, при котором общая прибыль от их реализации является максимальной. Что произойдет с общей прибылью, если прибыль от продажи продукции вида 4 вырастет втрое? Как изменится общая прибыль, если предприятию будет необходимо выпускать не меньше 1 единиц продукции 3? Если увеличить время использования фрезерных станков на 80 станко-часов, то можно ли будет уменьшить время использования других станков?
написать программу для ввода значения величины X целого типа, присваивания величине Y действительного типа значения 2.5 , вычисления значения величины
Z=X/Y и вывода значения величины Z. Протестировать алгоритм для X=5, X=0, X=-8.75
Срочно помогите пожалуйста с надстройкой "Поиск решения в Excel". Задания напишу С помощью пакета Поиск решения исследовать
на максимум гипотетическую функцию Лаффера двух переменных, заданную формулой
V(r,q)= 100*r*q*(1-0,01*r)^4(1-0,01*q)^2,3
Где r – ставка налога на добавленную стоимость, q – ставка налога на прибыль.
Построить трехмерный график (поверхность) этой функции.
С помощью пакета Поиск решения найти минимум функции
F(x1,x2)=3*x1+2*x2 при ограничениях на переменные
14-2*x2 <= 7*x1
4*x1+5*x2>=20
x1>=0
x2>=0
С помощью пакета Поиск решения решить системы уравнений
y-x=5
z*(y-x)-4*y= -30
2*z*(y-x)-4*y=0
Для изготовления двух видов продукции Р1и Р2 используется три вида сырья S1, S2, S3.
Расход сырья на единицу продукции
Вид сырья
Запас сырья
Р1
Р2
S1
20
2
5
S2
40
8
5
S3
30
5
6
Прибыль от реализации единицы продукции
50
40
С помощью пакета Поиск решения найти максимум прибыли.
Читайте также
Borland Pascal.Составить программу нужно
Попадает ли т.М в заштрихованную область?
Помогите пожалуйста!! ) составить программу в "Pascal abc"!!)
Составить программу вычисления значений функции F(x) на отрезке [а; b] с шагом h.
Результат представить в виде таблицы, первый столбец которой — значения
аргумента, второй — соответствующие значения функции: "F(x) = 1/2 ctg x/4+4"
1. Составить программу для нахождения наибольшего числа из трех чисел.
2. Составить программу для упорядоченное двух элементов по убыванию.
Вы находитесь на странице вопроса "Pascal составить прграмму .", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.