Форум программистов, компьютерный форум, киберфорум
Free Pascal
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.64/11: Рейтинг темы: голосов - 11, средняя оценка - 4.64
 Аватар для emilija
1 / 1 / 2
Регистрация: 19.12.2013
Сообщений: 117
1

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

30.03.2014, 16:03. Показов 2127. Ответов 3
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Создать файл number.txt и вписать туда разные числа. Написать программу которая считает сколько чисел в текстовом файле number.txt и определяет их сумму.
0
Лучшие ответы (1)
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
30.03.2014, 16:03
Ответы с готовыми решениями:

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

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

Написать программу которая определяет нуль и считает его количество из ряда введенных чисел
Здравствуйте! написать программу которая определяет нуль и считает его количество из ряда введенных чисел Заранее спасибо!

3
 Аватар для emilija
1 / 1 / 2
Регистрация: 19.12.2013
Сообщений: 117
31.03.2014, 20:33  [ТС] 2
Кто нибудь помогите с этой программой
0
Модератор
10140 / 5476 / 3370
Регистрация: 17.08.2012
Сообщений: 16,730
31.03.2014, 23:10 3
Лучший ответ Сообщение было отмечено emilija как решение

Решение

Файл number.txt создайте с помощью блокнота в корневом каталоге диска c:
Не допускайте пустых строк в конце файла. Каждое число располагайте на отдельной строке.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
var n, s: real;
    f: text;
    k: integer;
begin
  assign(f, 'c:\number.txt');
  reset(f);
  s := 0;
  k := 0;
  while not(eof(f)) do
    begin
      readln(f, n);
      s := s + n;
      inc(k)
    end;
  writeln('s = ', s, ',  k = ', k);
  readln
end.
1
Модератор
Эксперт Pascal/DelphiЭксперт NIX
 Аватар для bormant
7801 / 4623 / 2832
Регистрация: 22.11.2013
Сообщений: 13,132
Записей в блоге: 1
02.04.2014, 19:16 4
Цитата Сообщение от Cyborg Drone Посмотреть сообщение
Не допускайте пустых строк в конце файла
Это ограничение легко обойти следующим образом:
Pascal
1
while not SeekEOF(f) do
Добавлено через 2 минуты
Да и количество чисел считал бы несколько иначе:
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
var
  n, s: real;
  k: integer;
  f: text;
begin
  assign(f, 'c:\number.txt'); reset(f);
  while not SeekEOF(f) do begin
    read(f, n);
    s:=s+n;
    inc(k);
  end;
  writeln('s = ', s, ',  k = ', k);
  readln
end.
Добавлено через 3 минуты
Допустим, дан файл:
Code
1
2
3
1 2 3
4 5 6
7 8 9
Ваш результат: s=12, k=3
Мой результат: s=45, k=9
и что-то мне подсказывает, что мой ближе к истине ;-)
2
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
02.04.2014, 19:16
Помогаю со студенческими работами здесь

написать программу,которая считает 10 чисел из файла 1.txt и запишет в новый файл максимальное из этих чисел.
написать программу,которая считает 10 чисел из файла 1.txt и запишет в новый файл максимальное из этих чисел.

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

Написать программу, которая вычисляет среднее арифметическое чисел класса, находящихся в текстовом файле F
Файл содержит информацию о среднех метках класса. например, Андрис Горкий 6 (оценка) Феликс Кант 3 Анна Петровна 8...

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

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


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

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему

Редактор формул (кликните на картинку в правом углу, чтобы закрыть)
Новые блоги и статьи
Winforstrap или красявый дизайн своими руками на HTML+JS+Winform­s
anomal6 04.03.2025
Сидел тут вечером ковырял проект на MAUI, и как же глупо создаются пакеты MSIX и система обновлений пакета публикации, но не об этом. Бывает нужен современный дизайн программы а писать на MAUI,. . .
Формат данных для симуляции физики, посредством распространённы­­­­­­­х не обученных моделей.
Hrethgir 04.03.2025
Что-то как-то снова потерялось, зато катангенсы закатангесились в одном сообщении. На днях писал, что планирую для работы апгрейдить (на этот раз удачно) девайс для работы (конкретно - здоровья для,. . .
Концепция variadic
CoderHuligan 04.03.2025
Мне не очень нравится (а кому это нравится?) что у нас есть отдельно компилятор, отдельно линковщик, причем со своим собственным командным языком. При этом усложнении надо знать помимо языка. . .
Java Record или Kotlin Data Class: что лучше для неизменяемых данных
Wired 04.03.2025
Java Record и Kotlin Data Class — два мощных инструмента для обуздания неизменяемых структур данных, каждый со своим уникальным подходом к решению этой задачи. История их появления весьма. . .
Создание производительны­­­х API с Java и gRPC
Wired 04.03.2025
В мире микросервисной разработки вопрос производительности часто становится краеугольным камнем. И хотя REST API давно завоевал сердца разработчиков своей простотой и интуитивностью, при высоких. . .
Что нового в JDK 24
Wired 04.03.2025
JDK 24 — это настоящий прорыв в эволюции Java, который кардинально меняет правила игры. В этом релизе разработчики Oracle наконец-то довели до ума множество критически важных улучшений в. . .
Разработка блокчейн с использованием Java: смарт-контракты и dApp
Wired 04.03.2025
Погружаясь в мир блокчейн-разработки на Java, разработчик получает доступ к внушительному арсеналу инструментов. В отличие от Solidity, который "заперт" в экосистеме Ethereum, Java предоставляет. . .
WebAssembly в Kubernetes
stackOverflow 03.03.2025
В современной экосистеме облачных технологий WebAssembly (Wasm) становится все более значимым компонентом, предлагая уникальный подход к выполнению кода в распределенных системах. Эта технология. . .
GitHub Actions или Jenkins: Выбираем CI/CD платформу
stackOverflow 03.03.2025
Непрерывная интеграция и развертывание (CI/ CD) изменили подход к разработке программного обеспечения, превратив его в бесшовный процесс от написания кода до развертывания в продакшн. GitHub Actions и. . .
Автоматизация тестирования Pull Request в Kubernetes: Интеграция с GitHub Actions и GKE
stackOverflow 03.03.2025
Масштабные проекты с использованием Kubernetes требуют надежной системы тестирования изменений перед их внедрением в продакшн-среду. Традиционный подход с ручной проверкой Pull Request не справляется. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru