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

Дан текстовый файл...

02.07.2010, 22:42. Показов 1153. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Дан текстовый файл, содержащий фамилии, имена студентов и пять оценок по итогам
семестра. Удалить из текстового файла все сведения о студентах, имеющих хотя бы одну двойку.
Помогите кто может.
0
Лучшие ответы (1)
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
02.07.2010, 22:42
Ответы с готовыми решениями:

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

Дан текстовый файл F. Переписать файл F в файл G, вставляя в конец каждой строки ее порядковый номер.
решите)

Дан текстовый файл Т1. Переписать в файл Т2 все компоненты файла Т1 с заменой в них символа «0» на символ «1» и наоборот.
Добрый вечер. Есть такая вот задачка. Помогите пожалуйста... Дан текстовый файл Т1. Переписать в файл Т2 все компоненты файла Т1 с...

1
 Аватар для lera8
636 / 219 / 64
Регистрация: 03.11.2009
Сообщений: 488
03.07.2010, 01:21
Лучший ответ Сообщение было отмечено Преступник как решение

Решение

Преступник, считываете с текстового файла фамилию, имя в отдельные переменные а и пять оценок по итогам считываете в массив и потом делаете проверку циклом по массиву на наличие двоек если двоек нет то записываем эту информацию в новый файл после окончания работы переименовываем и удаляем старый.
вот так код примерно будет выглядеть
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
reset(f)
 rewrite(f1)
   while not EOF(f) do
      begin
        readln(f,Fam);
        readln(f,Name);
          for i:=1 to 5 do
            read(f,a[i]);
          k:=0; 
          for i:=1 to 5 do
             if a[i]=2 then
                begin
                  k:=1;
                  break;
                end;
          if k <> 1 then
             begin
               writeln(f1,Fam);
                  {и так далее то есть имя и оценки}   
             end;
      end;
Добавлено через 47 секунд
Код примерный не проверялся так что дерзайте я показала пример решения вашей задачи
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
03.07.2010, 01:21
Помогаю со студенческими работами здесь

Дан текстовый файл f. Переписать компоненты файла f в файл g, вставляя в начало каждой строки по одному пробелу
помогите решить задачу, у самой только получилось чтоб программа копировался f в g, program project1; {$mode objfpc}{$H+} uses ...

Дан текстовый файл. Создать символьный файл
Дан текстовый файл. Создать символьный файл, содержащий все символы, встретившиеся в тексте, включая пробел и знаки препинания (без...

Дан текстовый файл.
Дан текстовый файл. Удалить из него все пустые строки.

Дан текстовый файл...
Дан тесктовый файл f. Слова разделены одним или несколькими пробелами. Удалить из файла все однобуквенные слова и лишние пробелы. Результат...

Дан текстовый файл. В каждой строке файла подсчитать среднюю длину слов. В новый файл записать слова с длиной большей
Помогите, пожалуйста. 1) Как вернуть значения n к 0 после подсчета количества слов в предложении? 2) Как отправлять слова на вывод в...


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

Или воспользуйтесь поиском по форуму:
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, знаешь?. . Когда вечерние улицы становятся ночными, а ты не можешь уснуть. Ты идёшь в любимый старый бар, и бармен наливает тебе виски. Ты смотришь на пролетающие. . .
SDL3 для Desktop (MinGW): Вывод текста со шрифтом TTF с помощью библиотеки SDL3_ttf на Си и C++
8Observer8 24.03.2026
Содержание блога Финальные проекты на Си и на C++: finish-text-sdl3-c. zip finish-text-sdl3-cpp. zip
Жизнь в неопределённости
kumehtar 23.03.2026
Жизнь — это постоянное существование в неопределённости. Например, даже если у тебя есть список дел, невозможно дойти до точки, где всё окончательно завершено и больше ничего не осталось. В принципе,. . .
Модель здравоСохранения: работники работают быстрее после её введения.
anaschu 23.03.2026
geJalZw1fLo Корпорация до введения программа здравоохранения имела много невыполненных работниками заданий, после введения программы количество заданий выросло. Но на выплатах по больничным это. . .
Контроль уникальности заводского номера
Maks 23.03.2026
Алгоритм контроля уникальности заводского (или серийного) номера на примере нетипового документа выдачи шин для спецтехники с табличной частью, разработанного в конфигурации КА2. Номеклатура. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru