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

3 Мая 2019 в 19:50
275 +1
0
Ответы
1

Для нахождения суммы и среднего арифметического из чисел в файле 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" с числами доступен для программы и содержит числа в правильном формате (каждое число на отдельной строке).

28 Мая 2024 в 16:54
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
Прямой эфир