Var A,B:integer; Begin Write('Введите два целых числа: ');ReadLn(A,B); if B < 0 then Begin WriteLn(a,b,' = ',a+b); WriteLn(a,'-(',b,') = ',a,'+',-b,' = ',a-b); WriteLn(a,'*(',b,') = ',a*b); WriteLn(a,':(',b,') = ',a/b); End else Begin WriteLn(a,'+',b,' = ',a+b); WriteLn(a,'-',b,' = ',a-b); WriteLn(a,'*',b,' = ',a*b); WriteLn(a,':',b,' = ',a/b); End End.
Щелкните слайд, на который хотите добавить фоновый цвет. Выберите Конструктор > Стили фона > Формат фона. Выберите Заливка > Сплошная заливка. Нажмите кнопку Цвет и выберите нужный цвет. Чтобы увидеть другие цвета, щелкните Другие цвета, а затем выберите готовый вариант на вкладке Обычные или создайте собственный на вкладке Спектр. Пользовательские цвета и цвета на вкладке Обычные не обновляются при последующем изменении тема документа. Выполните одно из указанных ниже действий. Чтобы применить цвет только к выбранным слайдам, выберите команду Закрыть. Чтобы применить цвет ко всем слайдам презентации, выберите команду Применить ко всем.