Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

Форум «Всё о Паскале» _ Задачи на заказ _ Помогите решить задачу, срочно надо

Автор: r_rock 19.05.2007 22:56

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

Автор: Tan 19.05.2007 22:59

решалось, используй поиск.

Автор: sonic 19.05.2007 23:01

Смотри личные сообщения

Автор: ramzes 19.05.2007 23:13

смотри личку

Автор: Tan 20.05.2007 0:13

Не стыдно за такое деньги брать ? r_rock если не найдёшь похожее, обращайся, помогу бесплатно.

Автор: MAXXX 20.05.2007 0:58

Естественно, нельзя за такое брать деньги!
Вот примерный код:

Код

Var r,d:Real;
begin
Assign(input,'{имя файла}');
Reset(input);
r:=0;
While not eof do
begin
Read(d);
r:=r+d;
end;
Close(input);
Writeln(r);
end.

Автор: мисс_граффити 20.05.2007 1:53

При чем здесь "Стыдно"?
Есть правила форума.
http://forum.pascal.net.ru/index.php?showtopic=8896

sonic, я предупреждала. Еще раз подобное - отправишься в премод. Тем более что Tan конкретно написал: решалось.
ramzes, то же самое. предупреждение номер раз.

Автор: sonic 21.05.2007 16:41

Цитата(мисс_граффити @ 19.05.2007 21:53) *

sonic, я предупреждала. Еще раз подобное - отправишься в премод. Тем более что Tan конкретно написал: решалось.

Публично извиняюсь, я не знал что подобное задание уже решалсь на форуме,а тогда, когда я начал писать в тему, сообщения Tan'a ещё не было