можно сразу файл заранее!! Работа 15. Создаём линейную презентацию Презентация «Часы» Задание 1 1. Через пункт Все программы главного меню запустите редактор презентаций PowerPoint. 2. На вкладке Главная в группе Слайды щёлкните мышью на кнопке Макет. Выберите Пустой слайд. 3. С готовых фигур (вкладка Вставка, группа Иллюстрации) на пустом слайде изобразите циферблат с двумя стрелками. Это может выглядеть, например, так: Чтобы циферблат был симметричным, сначала изобразите в центре экрана пересекающиеся горизонтальную и вертикальную прямые — оси симметрии. Пытайтесь рисовать рационально — копируйте повторяющиеся фрагменты, при необходимости изменяйте их с команд группы Повернуть (Средства рисования — Упорядочить — Повернуть 4. Скопируйте слайд с часами в буфер обмена. Для этого: 1) на вкладке Слайды левой панели щёлкните на слайде с часами; 2) щёлкните на кнопке Копировать (вкладка Главная). 5. Вставьте в презентацию ещё 4 копии этого слайда (кнопка Вставить на вкладке Главная). Всего должно получиться 5 слайдов. 6. Внесите изменения в положение стрелок на слайдах так, чтобы на них последовательно отмечалось время: 12.00, 12.15, 12.30, 12.45 и 13.00. 7. Перейдите на вкладку Переходы. В группе Время показа слайдов: 1) установите минимальную длительность перехода между слайдами (00, 01); 2) выберите режим смены слайдов После (отметьте флажком) и установите время 1 сек (00:01, 00); 3) щёлкните на кнопке Применить ко всем. 8. Запустите презентацию, нажав клавишу . 9. При наличии времени внесите в презентацию промежуточные слайды так, чтобы на них отмечалось время 12.05, 12.10 и т. д. 10. Сохраните работу в личной папке под именем Часы.
Ответы
Const
nn = 50;
var
a,b,nb:array[1..nn] of integer;
i,n,j: integer;
begin
Write('Введите количество элементов в массиве (n<51): ');
Read(n);
Writeln('Вводите элементы массива');
j:=0;
for i:=1 to n do
begin
Read(a[i]);
if a[i]<0 then begin Inc(j); b[j]:=a[i]; nb[j]:=i end
end;
if j>0 then begin
Write('Отрицательные элементы: ');
for i:=1 to j do Write(b[i],' ');
Writeln;
Write('Индексы отрицательных элементов в массиве:');
for i:=1 to j do Write(nb[i]:3);
Writeln
end
end.
Результаты тестирования:
Введите количество элементов в массиве (n<51): 9
Вводите элементы массива
3 5 -2 3 -2 0 -6 -8 1
Отрицательные элементы: -2 -2 -6 -8
Индексы отрицательных элементов в массиве: 3 5 7 8
Введите количество элементов в массиве (n<51): 8
Вводите элементы массива
-1 -2 -3 -4 0 -1 2 3
Отрицательные элементы: -1 -2 -3 -4 -1
Индексы отрицательных элементов в массиве: 1 2 3 4 6
nn = 50;
var
a,b,nb:array[1..nn] of integer;
i,n,j: integer;
begin
Write('Введите количество элементов в массиве (n<51): ');
Read(n);
Writeln('Вводите элементы массива');
j:=0;
for i:=1 to n do
begin
Read(a[i]);
if a[i]<0 then begin Inc(j); b[j]:=a[i]; nb[j]:=i end
end;
if j>0 then begin
Write('Отрицательные элементы: ');
for i:=1 to j do Write(b[i],' ');
Writeln;
Write('Индексы отрицательных элементов в массиве:');
for i:=1 to j do Write(nb[i]:3);
Writeln
end
end.
Результаты тестирования:
Введите количество элементов в массиве (n<51): 9
Вводите элементы массива
3 5 -2 3 -2 0 -6 -8 1
Отрицательные элементы: -2 -2 -6 -8
Индексы отрицательных элементов в массиве: 3 5 7 8
Введите количество элементов в массиве (n<51): 8
Вводите элементы массива
-1 -2 -3 -4 0 -1 2 3
Отрицательные элементы: -1 -2 -3 -4 -1
Индексы отрицательных элементов в массиве: 1 2 3 4 6
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Популярные вопросы в разделе
Что обозначает bb в Маинкрафте. Часто игроки пишут, интересно
Автор: ashantik
Составьте блок схему вычисления значения выражения y=x2-2ax-10
Автор: ShafetdinovAndrei
Программа представлена на скрине.
Далее под константой будет пониматься макроопределение (символическая константа)
Были созданы константы для обозначения флагов ингредиентов. Им даны осмысленные названия. Также была создана константа для формирования пустого заказа.
int ingredientsCount(Pizza&); - возвращает количество ингредиентов.
void addCheese(Pizza&); - добавляет в заказ сыр
void removeOnion(Pizza&); - убирает из заказа лук
void togglePineapple(Pizza&); - переключает ананасы
void addOnionIfMushroomsExist(Pizza&); - добавляет лук если есть грибы