larryisreallmao
14.09.2020 14:16

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

в сеть пиццерий поступило n заказов, каждый из заказов может быть выполнен в любой из пиццерий. для каждого заказа и каждой из двух пиццерий известно время, необходимое для доставки и возвращения курьера обратно в пиццерию. заказы могут выполняться в любом порядке. курьер может приступать к выполнению следующего заказа сразу после возвращения в пиццерию.

для каждого из заказов определите, какой из курьеров должен его доставлять чтобы последний из двух курьеров вернулся в пиццерию после выполнения всех своих заказов как можно раньше.

формат входных данных
в первой строке задаётся число n (1 ≤ n ≤ 1000) — количество заказов.

в каждой из следующих n строк идёт описание заказов, по одному в строке. в i-й из этих строк даны 2 числа ai и bi (1 ≤ ai, bi ≤ 100) — время необходимое для доставки и возвращения в пиццерию первого и второго курьера соответственно для выполнения i-го заказа.

формат результата
выведите n чисел 1 или 2, номер курьера, который будет выполнять соответствующий заказ.

если правильных ответов несколько — выведите любой из них.

примеры
входные данные
3
1 1
10 2
1 4
результат работы
1 2 1

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
dfgdfh2
29.11.2020 04:43
1. a; c
2. write(); writeln(). Пример: write(c) /поясняю: ln добавляется для перехода на следующую строку при выводе/
3. Ошибка - в строке "writeln(введите значения переменных m и n);" не указана переменная k. Так же не нужны кавычки в выводе, а при вводе необходимы.
Исправление:
program prim_a;
var m, n, k: integer;

begin
writeln('введите значения переменных m, n и k');
read(m,n, k);
writeln((m+n+k)*5);
end.
4. a) 
program plowad;
var
a, h: real;

begin
writeln('Введите основание треугольника и высоту');
readln(a, h);
writeln('Площадь треугольника равна ', a*h/2);
end.
5. program proizvedenie;
var 
a, b: integer;

begin
writeln('Введите двузначное число');
readln(a);
b:=a mod 10;
a:=a div 10;
writeln('Произведение цифр двузначного числа равно ', a*b);
end.
0,0(0 оценок)
Ответ:
dimadementev2
09.05.2020 09:01
Program znanija;
var A:array[1..20] of integer;   
i,k,min,n:integer;
begin
min:=1000000000; // прощу прощение за такое ) 

for i:=1 to 20 do  A[i]:=random(9); // заполняем массив 

for i:=1 to high(A) do  // находим минимальное нечётное, запоминаем его номер
if (A[i] < min) and (A[i] mod 2 <> 0) then begin
n:=i; min:=A[i];
end;  

for i:=1 to 20 do  write(A[i]:3);   // Выводит весь массив 

writeln();  // просто перевод на новую строку для красоты 

writeln('Minimum: ',min,' Ego nomer: ',n); // выдаём минимальное и его номер
end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота