Учні загальноосвітніх закладів склали тест з декількох предметів для отримання сертифікату навчальних досягнень. Бали за тест, від 0 до 100, виставлені в лінійну таблицю a[1 .. 20] { заповнити довільними числами, використовуючи random(100)}. Знайти найвищий бал з предмету та їх загальну кількість, використовуючи середовище програмування PascalABC.​

Презентацию можно создать в PowerPoint'е. Запуская его, первой страницей будет титульный лист. На нем пишется тема презентации и кто подготовил.
Чтобы добавить слайды нужно нажать на кнопку "Создать слайд" (см. первый скрин).
Чтобы презентация была красочнее есть вставка различных объектов: изображений, звуков, фигур и прочего (см. второй скрин). Нажимаете на нужную кнопку, выберите, что надо и оно будет в презентации.
Также есть различные темы оформления, их можно скачивать из Интернета или пользоваться уже загруженными (см. третий скрин).
Есть анимация слайдов и показов слайдов, тоже можно выбрать (см. четвертый и пятый скрины).

Есть очень много примеров в YouTube или обычных статьях. Пусть подруга лучше их посмотрит/прочитает.

// PascalABC.NET 3.1, сборка 1179 от 29.02.2016
function IsPrime(n:integer):boolean;
begin
  Result:=Range(2,Round(sqrt(n))).All(i->n mod i<>0)
end;

begin
  var n:=9;
  var a:=MatrixRandom(n,n,3,15);
  var k:=0;
  for var i:=0 to n-1 do begin
    for var j:=0 to n-1 do begin
      Write(a[i,j]:3);
      if IsPrime(a[i,j]) then Inc(k)
      end;
    Writeln
    end;
  Writeln('Простых чисел: ',k)
end.

Тестовое решение:
 12 15 13  5  8  5 11 14  9
  7  7 14 10  5 10  9 12  3
  8  8 10  7 12 14  7  6  9
 13 13  7  6  4  9 13 10 11
 15  4 11 12 11  4 12  8  9
  7  6 14  5 10 15  6  7  9
  4  7  6 14 13  5 11 13  3
  4  4  5  7 12 10 14  9 11
  7 12 13  8 10  6  8  3 15
Простых чисел: 32