Вычислить средний балл учеников вашего класса по физике - Pascal

Формулировка задачи:

//  Вычислить средний балл учеников вашего класса по физике
var
  i, Ball, N, S: real;// бал, Количество учеников,Сумма балов
  SBall: real;
 
begin
  Write('Enter the number of pupils: ');
  Read(N);
  S := 0;
  for i := 1 to N do //Курсор выделяет эту строку а компилятор выдает.. Ожидался порядковый тип Что это означает?
  begin
    Write('Enter Ball of pupil');
    Read(Ball);
    S := (S + Ball) / N
  end;
  Writeln('SBall=', S);
  
end.

Решение задачи: «Вычислить средний балл учеников вашего класса по физике»

Листинг программы

//  Вычислить средний балл учеников вашего класса по физике
var
  i, Ball, N, S: integer;// бал, Количество учеников,Сумма балов
  SBall: real;
 
begin
  Write('Enter the number of pupils: ');
  Read(N);
  S := 0;
  for i := 1 to N do 
  begin
    Write('Enter Ball of pupil');
    Read(Ball);
    S := S + Ball
  end;
  SBall :=S / N;
  Writeln('SBall=', SBall);
end.

Объяснение кода листинга программы

Задание: Вычислить средний балл учеников вашего класса по физике
Переменные:
- i: индекс ученика
- Ball: балл ученика по физике
- N: количество учеников
- S: сумма баллов
- SBall: средний балл
Создание переменных:
- i, Ball, N, S, SBall: целочисленные типы данных
Ввод данных:
- Запрос количества учеников (N)
- Для каждого ученика:
  - Запрос балла по физике (Ball)
  - Сумма баллов (S) инициализируется как 0
  - Значение i увеличивается на 1
- Инициализация переменной SBall как 0
Вычисление среднего балла (SBall):
- SBall = S / N
Вывод результата:
- Вывод значения SBall
- Конец программы