ответ: 400
Объяснение:
Мистер Фокс находится на 1999 этаже. Узнаем, на каких ближайших этажах останавливается грузовой лифт. Остаток от деления 1999 на 7 равен 4. Значит лифт останавливается тремя этажами ниже и четырьмя этажами выше (где остаток от деления номера этажа на 7 равен 1).
Вариант первый: холодильник доставляют на 1996 этаж (1999-3). В таком случае, за подъём по лестнице придётся заплатить 450 рублей (150×3).
Вариант второй: холодильник доставляют на 2003 этаж (1999+4). В таком случае, за спуск по лестнице придётся заплатить 400 рублей (100×4).
Итак, как можно увидеть, наименьшая сумма, которую придётся заплатить, равна 400 рублей.
ответ: 400
Объяснение:
Мистер Фокс находится на 1999 этаже. Узнаем, на каких ближайших этажах останавливается грузовой лифт. Остаток от деления 1999 на 7 равен 4. Значит лифт останавливается тремя этажами ниже и четырьмя этажами выше (где остаток от деления номера этажа на 7 равен 1).
Вариант первый: холодильник доставляют на 1996 этаж (1999-3). В таком случае, за подъём по лестнице придётся заплатить 450 рублей (150×3).
Вариант второй: холодильник доставляют на 2003 этаж (1999+4). В таком случае, за спуск по лестнице придётся заплатить 400 рублей (100×4).
Итак, как можно увидеть, наименьшая сумма, которую придётся заплатить, равна 400 рублей.
pascal
Объяснение:
procedure sortmas(a: array of integer);
var i, j, min, ind: integer;
begin
for i := 0 to Length(a) - 2 do
begin
min := a[i]; ind := i;
for j := i + 1 to Length(a) - 1 do
if a[j] < min then
begin
min := a[j]; ind := j;
end;
a[ind] := a[i]; a[i] := min;
end;
end;
var a: array of integer;
n , i: integer;
begin
WriteLn('Введите размер массива: '); Read(n);
SetLength(a, n);
Randomize;
WriteLn('Содержимое массива:');
for i := 0 to Length(a) - 1 do
begin
a[i] := random(100);
Write(a[i], ', ');
end;
WriteLn;
sortmas(a);
WriteLn('Три минимальных элемента: ', a[0], ', ', a[1], ', ', a[2], ', ');
end.