С Новым годом! Форум программистов, компьютерный форум, киберфорум
Lazarus
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.60/5: Рейтинг темы: голосов - 5, средняя оценка - 4.60
0 / 0 / 0
Регистрация: 25.11.2018
Сообщений: 46
1

Написать программу, которая, работая с файлами в режиме диалога, считает сумму всех встретившихся в файле чисел

28.02.2020, 15:43. Показов 861. Ответов 3

Author24 — интернет-сервис помощи студентам
Создать в программе блокнот текстовый файл, каждая строка которого содержит как целые числа, так и любые другие слова, отделенные друг от друга одним или несколькими пробелами.
Написать программу, которая, работая с файлами в режиме диалога, считает сумму всех встретившихся в файле чисел и записывает ее в другой файл.
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
28.02.2020, 15:43
Ответы с готовыми решениями:

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

Написать программу которая считает сколько чисел в текстовом файле number.txt и определяет их сумму
Создать файл number.txt и вписать туда разные числа. Написать программу которая считает сколько...

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

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

3
5087 / 2658 / 2350
Регистрация: 10.12.2014
Сообщений: 10,052
28.02.2020, 15:52 2
profivsvoemdele, при чём здесь „Лазарь“?
Вы в разделе PABC.NET!
Ну а на нет ответ таков:

Pascal
1
2
3
begin
  WriteAllText('result.txt', ReadAllText('text.txt').ToWords.Select(word->begin try Result := StrToInt(word) except Result := 0; end; end).Sum.ToString);
end.
0
Супер-модератор
Эксперт Pascal/DelphiАвтор FAQ
33006 / 21309 / 8183
Регистрация: 22.10.2011
Сообщений: 36,614
Записей в блоге: 8
02.03.2020, 18:36 3
Для Лазаруса (числа могут быть не только целыми, но и вещественными) :
Pascal
1
2
3
4
5
6
7
8
9
10
// uses ..., FileUtil;
procedure TForm1.Button1Click(Sender: TObject);
var
  s : string;
  sum : Double;
begin
  sum := 0.0;
  for s in ReadFileToString('file.txt').Split([' ']) do sum := sum + StrToFloatDef(s, 0.0);
  ShowMessageFmt('Сумма всех чисел в файле равна %f', [sum]);
end;
0
5087 / 2658 / 2350
Регистрация: 10.12.2014
Сообщений: 10,052
03.03.2020, 04:37 4
volvo, у ТС сказано
Цитата Сообщение от profivsvoemdele Посмотреть сообщение
каждая строка которого содержит как целые числа, так и любые другие слова,
Про вещественные числа ни слова.
0
03.03.2020, 04:37
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
03.03.2020, 04:37
Помогаю со студенческими работами здесь

Написать программу, которая из всех цифр, встретившихся в строке и не равных нулю, формирует наименьшее число
Добрый день,дали задачу по информатике,сказали из с4. Условие задачи: На вход программе подается...

Написать программу, которая в вещественном числе, введённом в режиме диалога, выделяет целую и дробную части
Здравствуйте! Подскажите ошибку в коде, пожалуйста. Программа должна выделять отдельно целую и...

Написать программу, которая в вещественном числе, введённом в режиме диалога, выделяет целую и дробную части
Написать программу, которая в вещественном числе, введённом в режиме диалога, выделяет целую и...

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


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Новые блоги и статьи
Что такое HCL Notes и как с ним работать
InfoMaster 10.01.2025
HCL Notes (ранее известный как IBM Notes и Lotus Notes) представляет собой комплексную платформу для совместной работы и обмена информацией в корпоративной среде. Это многофункциональное решение,. . .
Как работать с Git из Windows и Visual Studio
InfoMaster 10.01.2025
Работа с Git в Windows Работа с Git в операционной системе Windows может быть осуществлена с помощью различных инструментов, каждый из которых обладает своими уникальными возможностями и. . .
Аналог оператора switch case в Python
InfoMaster 10.01.2025
Оператор switch case используется в программировании для выбора одного из нескольких вариантов исполнения кода. Однако в языке Python этот оператор отсутствует. Понимание аналогов switch case в. . .
Отличия абстрактного класса от интерфейса
InfoMaster 10.01.2025
В современной разработке программного обеспечения существуют два основных механизма реализации абстракции: абстрактные классы и интерфейсы. Эти инструменты, хотя и схожи в своей основной цели -. . .
Как работать в Git
InfoMaster 10.01.2025
Git — это одна из наиболее популярных систем контроля версий, которая активно используется разработчиками по всему миру. Она позволяет эффективно управлять изменениями в коде, координировать работу. . .
Реализация передвижения персонажа в Unity3d на C#
InfoMaster 10.01.2025
Реализация передвижения персонажа в Unity3D начинается с правильной настройки проекта. Этот этап критически важен для создания отзывчивого и плавного управления. Рассмотрим основные шаги для создания. . .
Docker: руководство для начинающих
InfoMaster 10.01.2025
В современном мире разработки программного обеспечения контейнеризация стала неотъемлемой частью процесса создания и развертывания приложений. Docker, как ведущая платформа контейнеризации, произвела. . .
Книги и учебные ресурсы по C#
InfoMaster 08.01.2025
Базовые учебники и руководства Одной из лучших книг для начинающих является "C# 10 и . NET 6 для начинающих" Эндрю Троелсена и Филиппа Джепикса . Книга последовательно раскрывает основные концепции. . .
Что такое NullReferenceEx­­­ception и как исправить?
InfoMaster 08.01.2025
NullReferenceException - одно из самых распространенных исключений, с которым сталкиваются разработчики на C#. Это исключение возникает при попытке обратиться к членам объекта (методам, свойствам или. . .
Что такое Null Pointer Exception (NPE) и как это исправить?
InfoMaster 08.01.2025
Null Pointer Exception (NPE) - это одно из самых распространенных исключений в Java, которое возникает при попытке использовать ссылку на объект, значение которой равно null. Это исключение относится. . .
Русский язык в консоли C++
InfoMaster 08.01.2025
При разработке программ на C++ одной из частых проблем, с которой сталкиваются русскоязычные программисты, является корректное отображение кириллицы в консольных приложениях. Эта проблема особенно. . .
Telegram бот на C#
InfoMaster 08.01.2025
Разработка ботов для Telegram стала неотъемлемой частью современной экосистемы мессенджеров. C# предоставляет мощный и удобный инструментарий для создания разнообразных ботов, от простых. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru