Мова програмування лазарус ! Серед учнів школи проводилося тестування з трьох предметів, по кожному з яких учні отримали певну кількість балів (цілі числа). Напишіть програму, яку можуть використати учні для обчислення їхнього середнього балу трьох тестів і виведення середнього значення.​

program AverageScore;

var

 Score1, Score2, Score3: integer; // оголошення змінних для збереження балів

 Average: real; // оголошення змінної для збереження середнього балу

begin

 // введення балів з клавіатури

 writeln('Введіть бал з першого предмету:');

 readln(Score1);

 writeln('Введіть бал з другого предмету:');

 readln(Score2);

 writeln('Введіть бал з третього предмету:');

 readln(Score3);

 // обчислення середнього балу

 Average := (Score1 + Score2 + Score3) / 3;

 // виведення середнього балу на екран

 writeln('Середній бал: ', Average:0:2);

 readln; // затримка виконання, щоб програма не закрилась одразу

end.