Задача 3: Гвоздики
В дощечку в ряд вбито 10 гвоздиков, таким образом, получилось 9 последовательных промежутков между ними. Длины промежутков (подряд, слева направо) оказались равны
7, 2, 8, 4, 3, 9, 5, 1, 6.
Между некоторыми соседними гвоздиками можно натянуть верёвочку, будем считать длину этой верёвочки равной длине промежутка. Вам необходимо привязать верёвочки так, чтобы к каждому гвоздику была привязана верёвочка хотя бы с одной стороны, при этом суммарная длина всех верёвочек была бы минимальной.
ответ запишите в виде последовательности из 9 чисел, равных 0 или 1. Число 0 означает, что в соответствующем промежутке нет верёвочки, число 1 означает, что в этом пр
Объяснение:
Поделитесь своими знаниями, ответьте на вопрос:
Нужно написать полноценную программу на паскале Используя оператор условного перехода, напишите программу, которая: 1) классифицирует компьютерную сеть. Программа запрашивает у пользователя число компьютеров в сети и в зависимости от введенного количества выводит класс сети (если число ЭВМ меньше 256 - то это сеть класса С, от 256 до 65535 - сеть класса В, свыше 65535 - сеть класса А); 2) запрашивает у пользователя номер одного из весенних месяцев, и выводит количество дней в этом месяце. Программа должна проверять, является ли введенный месяц весенним; 3) выводит на экран приглашение: «Который час?», вводит с клавиатуры число X, имеющее смысл времени суток, и печатает слова «Доброе утро», «Добрый вечер», «Добрый день» в зависимости от введенного времени. Программа должна реагировать на ввод неправильного времени: меньше 0 или больше 24;
1.
var
a : integer;
begin
readln(a);
if (a > 0) and (a < 256) then writeln ("Klass C")
else if (a >= 256) and (a < 65535) then writeln("Klass B")
else if (a > 65535) then writeln("Klass A");
end.
2.
var
a : integer;
begin
writeln("Введите номер весеннего месяца");
readln(a);
if (a >= 3) and (a <= 5) then
begin
case a of
3 : writeln("Март");
4 : writeln("Апрель");
5: writeln("Май");
end;
end
else writeln("Это не весенний месяц");
end.