| 180.
| Дан файл F, компоненты которого являются действительными числами. Найти:
а) сумму компонент файла;
б) произведение компонент файла;
в) сумму квадратов компонент файла;
г) среднее арифметическое элементов.
|
| 181.
| Дан файл F, компоненты которого являются целыми числами. Найти:
а) количество четных чисел среди компонент файла;
б) каких чисел больше: четных или нечетных.
|
| 182.
| Дано натуральное число N. Записать в файл целые числа В1, В2, …, Вn, определенные ниже:
а) I I = 1, 2, 3, …, N
б) I!
|
| 183.
| Дан символьный файл F. Добавить в файл символы E, N, D.
|
| 184.
| Дан символьный файл F.
а) подсчитать число вхождений в файл сочетаний АВ;
б) определить, входит ли в файл сочетание abcdef;
в) подсчитать число вхождений в файл каждой из букв a, b, c, d.
|
| 185.
| Определить количество слов в символьном файле.
|
| 186.
| Дан текстовый файл. Составить программу вывода на экран его содержимого:
а) в обратном порядке;
б) с исключением символов, отличных от букв и пробела.
|
| 187.
| Дан текстовый файл. Дописать в его конце следующие данные: количество строк, количество символов в каждой строке, количество элементов в каждой строке.
|
| 188.
| Пусть имеется типизированный файл, описанный как
var
f:integer;
состоящий из 100 компонент. Определите, сколько компонент будет содержать этот файл, если описать его как
var g:char;
|
| 189.
| Сформируйте типизированный файл из записей, каждая из которых содержит простое число и его квадрат. Включите в создаваемый файл все простые числа, не превосходящие 1000. Выведите содержимое созданного файла на экран.
|
| 190.
| Дан текстовый файл in.txt, содержащий произвольный текст. Получить файл out.txt, содержащий исходный текст с выровненными краями. Выравнивание производить за счет равномерной вставки пробелов в более короткие строки.
|