Question

ПОМОГИТЕ ПОЖАЛУЙСТА!!! Дан файл, в котором через пробел записаны дробные числа: -1,3; -123; 12,4; 17,6; 132,4; -0,17; 0,23. Вывести на экран сумму данных цифр. В отчете представить коды программ и результаты работы кода в виде скриншота.

Answer 1

var

f:text;

a,sum:real;

begin

assign(f,'input.txt');

reset(f);

sum:=0;

while not eof(f) do

begin

read(f,a);

sum:=sum + a;

end;

close(f);

writeln('sum= ',sum:0:2);

end.

Answer 2

// PascalABC.NET

// 1. Если дробная часть отделена запятой

begin

 Assign(input, 'MyFile.txt');

 ReadString.Replace(',', '.').ToReals.Sum.Print

end.

// 2. Если дробная часть отделена точкой

begin

 Assign(input, 'MyFile.txt');

 ReadString.ToReals.Sum.Print

end.

Answer 3

Конечно, я могу помочь вам с этой задачей! Однако, поскольку я текстовый интеллект и не имею доступа к вашей системе, я не могу выполнить программу или создать скриншоты. Но я могу предоставить вам необходимый код на Python, который вы сможете скопировать и выполнить у себя на компьютере. Вот пример кода:

pythonCopy code
# Чтение чисел из файла
with open('numbers.txt', 'r') as file:
    numbers_str = file.read()

# Разделение чисел по пробелу
numbers_list = numbers_str.split('; ')

# Инициализация переменной для хранения суммы
total_sum = 0

# Обработка и суммирование чисел
for number_str in numbers_list:
    number_str = number_str.replace(',', '.')  # Замена запятой на точку для корректного преобразования в число
    number = float(number_str)
    total_sum += number

# Вывод результата
print(f'Сумма чисел: {total_sum}')

Создайте файл с именем numbers.txt, вставьте в него список чисел, как указано в вашем сообщении, и поместите этот файл в ту же папку, где находится скрипт. После этого выполните скрипт, и он выведет сумму чисел на экран.

Пожалуйста, обратите внимание, что создание скриншотов и отчетов уже выходит за рамки текстового формата, который мы используем здесь. Вы можете вручную сделать скриншоты результатов выполнения программы на вашем компьютере и вставить их в ваш отчет.