Program Kontr1; Const
a : array[1..25] of integer = (4, 5, 3, 3, 4, 4, 2, 5, 3, 4, 5, 5, 2, 3, 3, 3, 4, 4, 5, 2, 2, 5, 4, 4, 4);
Var
k : integer;
Begin
write('Введите номер ученика:');
readln( ); {ввод номера ученика}
writeln( ); {вывод отметки ученика с этим номером}
End.

{Даны отметки учеников за контрольную работу (по пятибальной системе).

Отметки перечислены в том порядке, в каком ученики идут по списку в журнале.

Массив с отметками задан константой: в скобках после описания массива перечислены все значения его элементов. Поэтому вводить значения элементов массива в программе не нужно.

Вывести на экран отметку того ученика, номер которого укажет пользователь.}

1)Составить алгоритм «Вскипятить чайник» Начало 2. Открыть кран с водой. 3. Налить воду в чайник. 4. Закрыть кран. 5. Включить плиту. 6. Поставить чайник на огонь. 7. Ждать, пока вода закипит. 8. Выключить плиту. 9. Сказать «Чайник вскипел». 10. Конец В этом примере каждая команда имеет свой порядковый номер и записывается на отдельной строке. Этот алгоритм мы используем в нашей жизни или в быту. Такой алгоритм называют бытовым.
2)1. Начало 2. Выполнить первое действие: 81 : 9. 3. Запомнить результат первого действия. 4. Выполнить второе действие: 6 ∙ 4. 5.Сложить результаты первого и второго действий. 6. Записать ответ. 7. Конец

Как-то так
#include <iostream>
using namespace std;
int main(){    cout << "Vvedute kol-vo ocenok" << endl;
    int n,i,a,Four,Five;    n = i = a = Four = Five = 0;
    cin >> n;
    for (i = 1; i <= n; i++)    {        cin >> a;        if (a == 4){         Four++;}  else if (a == 5)      {         Five++;      }    }    if (Four > Five){   cout << "Four" << endl;} else if (Five > Four)      {   cout << "Five" << endl;      }      else      {         cout << "Equal"<< endl;      }      cout << "Kol-vo 4: " << Four << " Kol-vo 5: " << Five << endl;    return 0;}