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

На 1 ном слайде не стоит помещать 7 предоожений. 2) ctrp a

По горизонтали:
4. Устройство для записи, считывания и длительного хранения информации на гибких магнитных дисках (дискетах).
7. Устройство, предназначенные для вывода на экран текстовой и графической информации.
9. Ячейки памяти, которые служат для кратковременного хранения и преобразования данных и команд.
11. Линия связи к которой подключена сеть.
13. Устройство для записи, считывания и длительного хранения информации на жестких магнитных дисках.
14. Устройство ввода звуковой информации.
15. Системная магистраль передачи данных.

По вертикали: 
1. Устройство для вывода чертежей на бумагу.
2. Электронная схема, которая управляет работой какого-либо внешнего устройства.
3. Устройство для обмена информацией между компьютерами через телефонные, оптоволоконные и др. сети.
5. Вс процессор, предназначенный для выполнения математических и логических действий.
6. Небольшая электронная схема, выполняющая все вычисления и обработку информации.
8. Устройство вывода звуковой информации.
10. Устройство для считывания графической и текстовой информации в компьютер с бумажных носителей информации.
12. Печатающее устройство, предназначенные для вывода информации на бумагу.
14. Манипулятор для ввода информации в компьютер.

PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программа не работает, обновите версию!

begin
  var (sn,pp,kp):=(0,1,0);
  var n:integer;
  repeat
    Read(n);
    if (n<0) and n.IsOdd then sn+=n
    else
      if (n>0) and (n mod 3=0) then begin pp*=n; kp+=1 end
  until n=0;
  if sn=0 then begin
    Writeln('Нет отрицательных нечетных чисел');
    if kp=0 then Writeln('Нет положительных чисел, кратных 3')
    else Writeln('Произведение положительных чисел, кратных 3: ',pp)
    end
  else begin
    Writeln('Сумма отрицательных нечетных чисел: ',sn);
    if kp=0 then Writeln('Нет положительных чисел, кратных 3')
    else Writeln('Произведение положительных чисел, кратных 3: ',pp)
    end
end.

Пример
-367 23 62 7 12 -24 90 152 -63 0
Сумма отрицательных нечетных чисел: -430
Произведение положительных чисел, кратных 3: 1080