1. Дан файл, компонентами которого являются целые числа. Найти сумму и произведение компонент заданного файла.
2. Дан файл, компонентами которого являются целые числа. Вывести на экран последнюю и предпоследнюю компоненты этого файла.
3. Дан файл, компонентами которого являются целые числа. Найти максимальное значение среди компонент с нечетными номерами.
4. Даны файлы , компонентами которых являются целые числа. Организовать обмен данных между файлами по следующей схеме:
Разрешается использовать только один вспомогательный файл.
5. Дан текстовый файл f, содержаший программу на языке Паскаль. Проверить эту программу на несоответствие числа открывающих и закрывающих круглых скобок. Считать, что каждый оператор программы:
- занимает не более одной строки файла;
- может занимать произвольное число строк файла f.
6. Дан текстовый файл f. Получить все его строки, содержащие более 60 символов.
7. Дан текстовый файл f. Вывести на экран самую длинную строку файла. Если в файле имеется несколько строк с наибольшей длиной, то вывести все строки.
8. Дан текстовый файл f. Записать в перевернутом виде строки файла f в файл g. Порядок строк в файле g должен:
- совпадать с порядком исходных строк в файле f;
- быть обратным по отношению к порядку строк исходного файла.
9. Написать программу, которая подставляет номера строк (в качестве комментариев) в конец каждой строки с исходным текстом.
10. Написать программу, которая для любого входного текстового файла создает текстовый файл с повторением
каждой строки (решить эту задачу для случая использования нового файла и для случая, когда новый файл нельзя использовать).
11. Даны текстовый файл и строка s. Вывести на экран все строки файла f, содержащие в качестве фрагмента строку s.
12. Даны два текстовых файла f и g. Определить, совпадают ли компоненты файла f с компонентами файла g. Если нет, то получить номер первой строки и позицию первого символа в этой строке, в которых файлы f и g отличаются между собой.
13. Матрица размерностью n×n, содержащая простые числа, записана в файле по строкам. Указать столбцы, содержащие одинаковый набор элементов (порядок следования элементов роли не играет). Использовать дополнительные массивы и файлы не разрешается.
14. Дан файл записей типа: номер, фамилия, курс, оценка. Не используя дополнительного файла, разместить в этом файле сведения сначала об отличниках, потом о хорошистах и т.д.
15. Дан файл f, компоненты которого являются целыми числами. Никакая из компонент не равна нулю. Числа в файле идут в следующем порядке: десять положительных, десять отрицательных и т.д. Переписать компоненты файла f в файл g в следующем порядке: пять положительных, пять отрицательных и т.д. Решить эту задачу также при условии,
что перезапись в указанном порядке производится внутри одного файла, дополнительного файла g использовать нельзя.
16. Задано два файла записей. Сформировать третий файл, содержащий четные записи первого файла и нечетные второго файла.
17. Дано два файла записей типа: номер прибора, год выпуска, цена. Поменять содержимое этих двух файлов. Дополнительного файла не использовать.
18. Дано два файла записей типа: название прибора, диапазон, цена. Сформировать новый файл, содержащий записи о тех приборах, которые есть в первом файле, но которых нет во втором.
19. Сформировать файл, имеющий следующую структуру
type дата=record
число:1..31;
анкета = record
фамилия: string;
пол:(м,ж);
день рождения: дата;
end;
и определить:
- фамилию самого старшего мужчины;
- все фамилии, начинающиеся с заданной буквы;
- список людей, родившихся в заданном месяце.
20. Сформировать файл, имеющий следующую структуру
type знакомый=record
фамилия:string;
номер_тел:10000..99999;
адрес: string;
end;
и определить:
- есть ли в книжке телефон данного человека;
- кому принадлежит данный телефон;
- список людей, живущих на данной улице.
21. Сформировать файл, имеющий следующую структуру
type студент= record фамилия: string;
номер гр: string;
оценка1: integer;
оценка2: integer;
оценка3: integer;
end;
и определить:
- фамилию того, кто лучше всех сдал экзамены;
- средний балл по данному предмету;
- список задолжников.
22. Сформировать файл, имеющий следующую структуру
type студент= record фамилия:string;
имя:string;
пол:(м,ж);
возраст:16..35;
курс:1..5;
end;
и определить:
- курс, на котором наибольший процент мужчин;
-самые распространенные женские и мужские имена;
-список студентов данного пола, данного курса.
23. Сформировать файл, имеющий следующую структуру
type пассажир = record фамилия: string;
имя:string;
номер рейса:string;
количество вещей: integer;
общий вес: integer;
end;
и определить:
- рейс с максимальным весом багажа;
- пассажира с наибольшим количеством вещей;
- вывести список пассажиров и информацию об их багаже, улетающих данным рейсом.
24. Сформировать файл, имеющий следующую структуру
type владелец = record фамилия: string;
адрес: string;
марка автомобиля: string;
рег. номер: string;
год выпуска:1900..2000;
end;
и определить:
-количество автомобилей каждой марки;
-владельца самого старого автомобиля;
-фамилии владельцев и номера автомобилей данной марки.
25. Сформировать файл, имеющий следующую структуру:
type ребенок = record фамилия: string;
адрес: string;
пол:(муж,жен);
количество дней посещения: integer;
end;
и определить:
- самого болеющего ребенка;
- кто больше болеет мальчики или девочки;
- список детей проживающих на данной улице.
26. Сформировать файл, имеющий следующую структуру
type книга = record автор: string;
название: string;
год издание: integer;
издательство: string;
количество страниц: integer;
end;
и определить:
- есть ли в библиотеке книги данного автора;
- найти книгу с наибольшим количеством страниц;
- найти названия книг данного автора, изданных с указанного года, в данном издательстве.
27. Сформировать файл, имеющий следующую структуру
type товар = record наименование: string;
страна: string;
объем партии: integer;
цена: integer;
end;
и определить:
- страну, в которую экспортируется товар на максимальную сумму;
- список стран, в которые экспортируется данный товар;
- найти товары, который имеет минимальный объем партии.
28. Сформировать файл, имеющий следующую структуру
type игрушка = record название: string;
цена: integer;
возраст1:1..16;
возраст2:1..16;
end;
и определить:
- название самой дорогой игрушки;
- список игрушек, которые подходят детям данного возраста;
- подобрать игрушки на данную сумму денег (все варианты).
29. Сформировать файл, имеющий следующую структуру
type игрушка = record название: string;
цена: integer;
цвет: string;
возраст1:1..16;
возраст2:1..16;
end;
и определить:
- название игрушек, цена которых не превышает данную и которые подходят детям данного возраста;
- найти самую дешевую игрушку данного названия;
- найти самый распространенный цвет игрушек.
30. Сформировать файл, имеющий следующую структуру:
type пассажир=record фамилия:string;
имя:string;
номер рейса:string;
количество вещей: integer;
общий вес: integer;
end;
и определить:
- число пассажиров, количество вещей которых превосходит среднее число вещей;
- пассажира с данным количеством вещей и не более данного веса;
- вывести информацию о количестве вещей и общем весе каждого рейса.
31. Сформировать файл, имеющий следующую структуру
type спортсмен = record фамилия: string;
страна: string;
рост:150..220;
вес:30..100;
год рождения: integer;
результат: integer;
end;
и определить:
- средний рост и вес спортсменов данной страны;
- найти лучшего спортсмена данной страны;
- список спортсменов данного возраста с результатом, не хуже данного.
32. Сформировать файл, имеющий следующую структуру
type спортсмен = record фамилия: string;
страна: string;
тренер: string;
год рождения: integer;
результат: integer;
end;
и определить:
- найти самого молодого спортсмена, занимающегося у данного тренера;
- найти лучшего тренера данной страны;
- список тренеров с указанием страны.
33. Сформировать файл, имеющий следующую структуру
type предмет = record название: string;
количество часов: integer;
преподаватель: string;
кафедра: string;
форма отчетности: (зачет, экзамен);
end;
и определить:
- преподавателя, у которого самое большое количество часов;
- список предметов, по которым сдают экзамен;
- кафедру и преподавателя, который ведет данный предмет.
34. В текстовом файле найти те предложения, которые заканчиваются одинаковыми словами.
35. Матрица целых чисел записана по строкам в файл. Не используя нового файла, удалить из исходного файла строки матрицы, все элементы которых являются нулями.
36. За один просмотр файла , состоящего из вещественных чисел, без использования дополнительных файлов напечатать элементы файла в следующем порядке: сначала все числа, меньшие , затем – все числа из отрезка , и, наконец – все остальные числа, сохраняя исходный взаимный порядок в каждом из этих трех групп чисел ( и - заданные числа, ).
37. Содержимое текстового файла , разделенное на строки, переписать в текстовый файл , перенося при этом в конец каждой строки все входящие в нее цифры (с сохранением исходного взаимного порядка, как среди цифр, так и среди остальных литер строки).
38. Напечатать содержимое текстового файла ,выписав литеры каждой его строки в обратном порядке.
, компонентами которых являются целые числа. Организовать обмен данных между файлами по следующей схеме:
, состоящего из вещественных чисел, без использования дополнительных файлов напечатать элементы файла 
, затем – все числа из отрезка 
, и, наконец – все остальные числа, сохраняя исходный взаимный порядок в каждом из этих трех групп чисел ( 
- заданные числа, 
).
, перенося при этом в конец каждой строки все входящие в нее цифры (с сохранением исходного взаимного порядка, как среди цифр, так и среди остальных литер строки).