1 и 7
и составить таблицы истинности ​

1.       Основные этапы: подготовка материала для выбранной темы презентации.

·         Это изображения (простые и анимированные);

·         Тексты и цитаты из статей, книг, и других источников информации.

·         Видео и аудиозаписи, которые разнообразить и более наглядно раскрыть тему.

2.       Сценарий – это иными словами схема презентации.

·         Последовательность слайдов

·         Сопровождения материалов на слайде словами рассказывающего, чтобы более подробно раскрыть тему

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

3. После того, как набран материал для презентации и подготовлена схема – следует самому ещё просмотреть, чтобы исключить ошибки, которые могли возникнуть во время её составления (перепутались слайды, допущены ошибки в тексте, изображение на слайде перекрывает текст, плохо выбран цвет фона из-за чего не видно текст). Далее, если к презентации есть устное сопровождение – следует включить презентацию и сопровождать её устно, чтобы по времени определить примерное время всей презентации. Также это даст возможность настроить переключение слайдов по времени, когда вы будете знать, сколько должен определенный слайд держаться на экране, чтобы вы успели закончить устное сопровождение данного слайда.

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

В целом, интерактивная презентация предполагает собой взаимодействие человека с презентацией, то есть какие-то изменения с разрешения человека во время её показа.

Презентация по сценарию же, идет последовательно и без вмешательства в её ход.

Программа Вот:
Program z1;Var a,b,c,d,k:integer;BeginWriteln('Введите трехзначное число');REadln(a);While a<>0 do beginWriteln('Введите трехзначное число');REadln(a);b:=a div 100 mod 10;c:=a div 10 mod 10;d:=a mod 10;if b+c+d div 10 >0 then writeln('Сумма цифр- двузначное число') else writeln ('Нет, сумма цифр не двузначное число');if b*C*D div 100 >0 then writeln('Произведение цифр- терхзначное число') else writeln ('Нет, произведение цифр не трехзначное число число');Writeln ('Введите любое число');Readln (k);If b*c*d>k then writeln('Произведение цифр больше числа') else writeln('Произведение меньше числа');if B+c+d div 5 =0 then writeln('Сумма цифр числа кратна 5') else writeln ('Сумма цифр не кратна 5');if B+c+d div k =0 then writeln('Сумма цифр числа кратна числу, введенному с клавиатуры') else writeln ('Сумма цифр не кратна числу, введенному с клавиатуры');End;End. 
Есть маленькая проблема в начале, не помню как прописывать, поэтому число первый раз нужно вводить 2 раза, если не устраевает, можете воспользоваться другими ресурсами