Лабораторная работа MMC. №1 1. Создайте в корне диска C: папку Files
2. Откройте окно «Выполнить». Для этого нажмите комбинацию Win + R.
3. В открывшемся окне введите «mmc» (или «mmc.exe»). Откроется пустая
консоль MMC.
Консоль MMC (Microsoft Management Console) – место для хранения и
отображения средств администрирования, созданных корпорацией
Майкрософт и другими поставщиками программного обеспечения. Эти
средства называются оснастками и служат для управления
оборудованием, программным обеспечением и сетевыми компонентами
Windows. Некоторые средства, расположенные в папке
«Администрирование», например, «Управление компьютером»,
являются оснастками MMC.
4. Через меню «Файл»-«Добавить или удалить оснастку» добавьте
оснастки «Планировщик заданий» и «Общие папки».
Оснастка – это основной компонент консоли MMC. Оснастки можно
использовать только из консоли; запуск оснасток без консоли
невозможен.
5. Перейдите в пункт Планировщик заданий. Нажмите «Создать простую
задачу».
6. Следуя инструкциям создайте однократную задачу, которая открывает
любое приложение (например, блокнот) в 11:50.
7. Создайте bat файл, который создает папки Share1 и Share2 внутри папки
File. Создайте однократную задачу, которая запускает созданный bat
файл. Время=x+5 минут (где x – настоящий момент).
Уже готовые задания можете посмотреть, перейдя на пункт «Библиотека
планировщика заданий». Если добавленные вами задания не
отображаются, нажмите на кнопку «Обновить».
8. Назначьте папкам Share1 и Share2 полный доступ для Всех
пользователей.
9. Перейдите в пункт «Общие папки»-«Общие ресурсы». Создайте общий
сетевой ресурс (для этого нужно нажать правой кнопкой мыши и
перейти на соответствующее меню). Путь к папке – ваша папка Share1.
Вид разрешения – «У всех пользователей доступ только для чтения».
10.С Проводника откройте общий доступ к папке Share2. Всем
разрешите чтение и запись.
Посчитаем объем земли, который был снят.
Всю землю можно разделить на фигуры толщиной 1 метр, в основании которых трапеции с высотой 1 м и основаниями - двумя соседними измерениями высоты. Тогда объем каждой фигуры V(i) = (h(i) + h(i + 1)) / 2, полный объем V = V(1) + V(2) + ... + V(N - 1) = h(1)/2 + (h(2) + h(3) + ... + h(N - 2)) + h(N - 1)/2
Объем земли, который использовался для засыпания, равен V = h (N - 1).
Эти объемы, конечно, равны, тогда h = (h(1)/2 + h(N - 1)/2 + (h(2) + h(3) + ... + h(N - 2))/(N - 1)
PascalABC.NET 3.2.1518:
begin
var N := ReadInteger;
print(ReadSeqInteger(N)
.Select((x, i) -> (i = 0) or (i = N - 1) ? x/2 : x)
.Sum / (N - 1))
end.
С вводом-выводом в файл:
begin
var f := OpenRead('INPUT.TXT');
var N := f.ReadInteger;
var S := f.ReadInteger / 2;
for var i := 2 to N - 1 do
S += f.ReadInteger;
S += f.ReadInteger / 2;
print(S / (N - 1))
end.
Посчитаем объем земли, который был снят.
Всю землю можно разделить на фигуры толщиной 1 метр, в основании которых трапеции с высотой 1 м и основаниями - двумя соседними измерениями высоты. Тогда объем каждой фигуры V(i) = (h(i) + h(i + 1)) / 2, полный объем V = V(1) + V(2) + ... + V(N - 1) = h(1)/2 + (h(2) + h(3) + ... + h(N - 2)) + h(N - 1)/2
Объем земли, который использовался для засыпания, равен V = h (N - 1).
Эти объемы, конечно, равны, тогда h = (h(1)/2 + h(N - 1)/2 + (h(2) + h(3) + ... + h(N - 2))/(N - 1)
PascalABC.NET 3.2.1518:
begin
var N := ReadInteger;
print(ReadSeqInteger(N)
.Select((x, i) -> (i = 0) or (i = N - 1) ? x/2 : x)
.Sum / (N - 1))
end.
С вводом-выводом в файл:
begin
var f := OpenRead('INPUT.TXT');
var N := f.ReadInteger;
var S := f.ReadInteger / 2;
for var i := 2 to N - 1 do
S += f.ReadInteger;
S += f.ReadInteger / 2;
print(S / (N - 1))
end.