Найти сумму и среднее арифметическое из чисел в файле pascal

Предыдущий
вопрос Следующий
вопрос

Для нахождения суммы и среднего арифметического из чисел в файле Pascal можно написать код на языке Pascal. Вот пример такого кода:

program SumAverage;
var
inputFile: Text;
num, sum, count: Integer;
average: Real;
begin
Assign(inputFile, 'pascal.txt');
Reset(inputFile);
sum := 0;
count := 0;
while not eof(inputFile) do
begin
Readln(inputFile, num);
sum := sum + num;
count := count + 1;
end;
Close(inputFile);
average := sum / count;
writeln('Сумма чисел: ', sum);
writeln('Среднее арифметическое: ', average:0:2);
end.

Поместите числа, из которых нужно найти сумму и среднее арифметическое, в файл "pascal.txt". Запустите программу на выполнение, и она выведет сумму чисел и их среднее арифметическое.

Пожалуйста, убедитесь, что файл "pascal.txt" с числами доступен для программы и содержит числа в правильном формате (каждое число на отдельной строке).