ОТДЕЛ Задание+;
ИСПОЛЬЗУЕТ Матем ИЗ "...\Отделы\Обмен\";
ПЕР
массив_чисел: РЯД 100 ИЗ ЦЕЛ;
сч, мин, ном: ЦЕЛ;
УКАЗ
ОТ сч := 0 ДО РАЗМЕР(массив_чисел) - 1 ВЫП
массив_чисел[сч] := - УЗК(ВШИРЦЕЛ(Матем.случ() * 1000))
КОН;
мин := массив_чисел[0]; ном := 0;
ОТ сч := 1 ДО РАЗМЕР(массив_чисел) - 1 ВЫП
ЕСЛИ массив_чисел[сч] < мин ТО
мин := массив_чисел[сч]; ном := сч
КОН
КОН
(* мин - минимальное значение, ном - его номер *)
КОН Задание.
Обрати внимание на то, что считается фактическое минимальное значение, а не минимальный модуль.
Объяснение:
1. Слово «презентация» обозначает представление, демонстрацию. Презентация представляет собой последовательность слайдов. Обычно для компьютерной презентации используется мультимедийный проектор.
2. Существуют 3 класса презентаций: интерактивные презентации, презентации со сценарием, непрерывно выполняющиеся презентации.
Интерактивная – диалог между пользователем и компьютером. Презентацией управляет сам пользователь. Все интерактивные презентации управляются событиями.
Презентация со сценарием – показ слайдов под управлением ведущего (докладчика). Презентация может содержать анимированный текст, диаграммы и другие иллюстрации. Порядок смены слайдов определяет докладчик, он же произносит текст, разрабатывает презентации со сценарием.
Непрерывно выполняющиеся презентации – в таких презентациях не предусмотрен диалог с пользователем и нет ведущего. Такие презентации обычно демонстрируют на выставках.
3. Этапы создания: создание сценария, разработка презентации с использованием программных средств. (Схема будет на фотке, ее нужно зарисовать). Необходимо продумать содержание каждого слайда, выбрать программу разработки презентации, завершив построение презентации и подготовив доклад, необходимо провести репетицию, подобрать нужный темп и постараться уложиться в заданный регламент.
4. Каждая программа включает в себя встроенные средства создания анимации, добавления и редактирование звука, импортирования изображений, видео, а также создание рисунков. К примеру, известная программа Microsoft PowerPoint.
5. Области применения презентаций: бизнес, образование, наука, реклама, электронные учебники и энциклопедии
// PascalABC.NET 3.6
begin
ReadSeqIntegerWhile(p -> p <> 0).Count(p -> p.IsEven).Print
end.
begin
ReadSeqIntegerWhile(p -> p <> 0)
.Where(p -> p mod 3 = 0)
.Sum
.Print
end.