Форум программистов, компьютерный форум, киберфорум
PascalABC.NET
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.67/6: Рейтинг темы: голосов - 6, средняя оценка - 4.67
0 / 0 / 0
Регистрация: 26.05.2021
Сообщений: 7

операции с созданным файлом

31.05.2021, 10:35. Показов 1142. Ответов 3
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Записать в файл N действитель¬ных чисел. Выполнить следующие операции с созданным файлом

Написать программу, которая заносит в файл q все компоненты исходного файла, которые делятся на 10
0
Лучшие ответы (1)
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
31.05.2021, 10:35
Ответы с готовыми решениями:

Записать в файл N действитель¬ных чисел. Выполнить следующие операции с созданным файлом:
Записать в файл N действитель¬ных чисел. Выполнить следующие операции с созданным файлом: - Написать программу, которая ищет среднее...

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

Выполнить следующие операции с созданным файлом действительных чисел
. Записать в файл N действитель¬ных чисел. Выполнить следующие операции с созданным файлом: - Написать программу, которая ищет...

3
Эксперт Pascal/Delphi
6812 / 4568 / 4820
Регистрация: 05.06.2014
Сообщений: 22,433
31.05.2021, 10:54
Составить программу для вычисления значений функции f(х) на отрезке
0
12 / 10 / 3
Регистрация: 17.12.2019
Сообщений: 180
31.05.2021, 10:55
Лучший ответ Сообщение было отмечено jizaz как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
var f,q:text; i,n:integer; s:array [1..100] of integer; a:real; 
begin 
Assign (f,'1.txt');
Rewrite (f);
Writeln ('Введите  количество чисел (до 100)');
Readln (n);
Writeln ('Введите действительные числа');
for i:=1 to n do
  begin
readln (s[i]);
Writeln (f,s[i]);
  end;
Close(f);
Assign (q,'q.txt');
Rewrite (q);
for i:=1 to n do
  begin
  if s[i] mod 10 = 0 then
Writeln (q,s[i]);
end;
close (q);
end.
2
Эксперт Pascal/Delphi
6812 / 4568 / 4820
Регистрация: 05.06.2014
Сообщений: 22,433
31.05.2021, 10:56
Цитата Сообщение от jizaz Посмотреть сообщение
Записать в файл N действитель¬ных чисел.
Цитата Сообщение от jizaz Посмотреть сообщение
которые делятся на 10
В программе по ссылке используется конструкция:
Цитата Сообщение от schdub Посмотреть сообщение
if r / 10 = 0 then
У меня есть сомнения по поводу сравнения действительных чисел.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
31.05.2021, 10:56
Помогаю со студенческими работами здесь

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

Выполнить заданные операции над текстовым файлом
Дан текстовый файл, нужно нужно подсчитать количество строк в этом файле и вывести каждую вторую строку. Из файла получить получить массив...

Записать в файл N действительных чисел. Выполнить заданные операции с созданным файлом
Задание на зачет: Записать в файл N действитель¬ных чисел. Выполнить следующие операции с созданным файлом: - Написать программу,...

Работа с созданным файлом
День добрый! Пишу прогу по стеганографии (MFC). Сохраняю файл в изображении. При чтении, общая последовательность моих действий следующая: ...

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


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

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Новые блоги и статьи
Автозаполнение реквизита при выборе элемента справочника
Maks 27.03.2026
Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. При выборе "Спецтехники" (Тип Справочник. Спецтехника), заполняется. . .
Сумматор с применением элементов трёх состояний.
Hrethgir 26.03.2026
Тут. https:/ / fips. ru/ EGD/ ab3c85c8-836d-4866-871b-c2f0c5d77fbc Первый документ красиво выглядит, но без схемы. Это конечно не даёт никаких плюсов автору, но тем не менее. . . всё может быть. . .
Автозаполнение реквизитов при создании документа
Maks 26.03.2026
Программный код из решения ниже размещается в модуле объекта документа, в процедуре "ПриСозданииНаСервере". Алгоритм проверки заполнения реализован для исключения перезаписи значения реквизита,. . .
Команды формы и диалоговое окно
Maks 26.03.2026
1. Команда формы "ЗаполнитьЗапчасти". Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. В качестве источника данных. . .
Кому нужен AOT?
DevAlt 26.03.2026
Решил сделать простой ланчер Написал заготовку: dotnet new console --aot -o UrlHandler var items = args. Split(":"); var tag = items; var id = items; var executable = args;. . .
Отправка уведомления на почту при создании или изменении элементов справочника
Maks 24.03.2026
Программная отправка письма электронной почты на примере типового справочника "Склады" в конфигурации БП3. Перед реализацией необходимо выполнить настройку системной учетной записи электронной. . .
модель ЗдравоСохранения 5. Меньше увольнений- больше дохода!
anaschu 24.03.2026
Теперь система здравосохранения уменьшает количество увольнений. 9TO2GP2bpX4 a42b81fb172ffc12ca589c7898261ccb/ https:/ / rutube. ru/ video/ a42b81fb172ffc12ca589c7898261ccb/ Слева синяя линия -. . .
Midnight Chicago Blues
kumehtar 24.03.2026
Такой Midnight Chicago Blues, знаешь?. . Когда вечерние улицы становятся ночными, а ты не можешь уснуть. Ты идёшь в любимый старый бар, и бармен наливает тебе виски. Ты смотришь на пролетающие. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru