ПОМОГИТЕ ПОЖАЛУЙСТА!!! Дан файл, в котором через пробел записаны дробные числа: -1,3;...

Question

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

Comments

У Вас в решении - да. Я автора вопроса спрашиваю, как он считает: корректно ли заменять запятую из примера точкой?

---

Я написал оба решения, они отличаются десятком символов )))

---

а как ты под другому сделаешь? Получишь из файла строку, и уже программно будешь конвертировать это к типу real?

---

Ну эти числа в файле по факту и записаны, ток в формате языка.

---

Поэтому и вопрос. Может, это нарочно, чтобы усложнить задание.

---

Нет, тут сказано, что вот эти вот числа записаны в файле через пробел, а как именно, не сказано.

---

Числа в паскале записываются именно так.

---

Ну видишь, тут сказано записаны числа. предполагается всегда, что числа будут записаны в формате языка.

---

Именно так, если это требуется по задаче

---

так конечно можно, но смысл?

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.

---

---

---

Comments

Огромное спасибо!!!

---

Да не за что

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.

---

---

Comments

А это условно Pascal, лишь по синтаксису. На деле - C#, разбавленный кусками из Пайтона, Хаскель и Котлин.

---

Я с pascalем особо не знаком.

---

Насчет "красиво" - PascalABC.NET и создавался, чтобы школьные задачи писать в 1-2 строки.

---

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

---

Красиво. Ничего не скажешь.

---

Но при этом - полноценный компилятор с .NET-языка.