Государственный экзамен по информатике. Горбенко О.Д - 10 стр.

UptoLike

ВУЗ: 

ВГУ | Воронеж

Составители: 

Рубрика: 

14. Дан текстовый файл, состоящий из слов , разделенных пробелами.
Вывести слова, которые содержат в своем составе, по крайней мере,
две повторяющиеся буквы.
15. Дан текстовый файл, состоящий из слов , разделенных пробелами.
Определить буквы , которые присутствуют во всех словах
одновременно .
16. Дан текстовый файл , состоящий из предложений ,
заканчивающихся точкой. Построить новый текстовый файл, в
котором каждое предложение помещено в одну его строку.
17. В заданном текстовом файле заменить символы текста '1','2','3' на
группы символов 'один ', 'два', 'три' соответственно , оставив остальные
символы текста без изменения .
18. Два заданных отсортированных текстовых файла содержат
символьные представления целых чисел без знака, разделенные
пробелами. Объединить эти два файла в один , сохраняя
упорядоченность.
19. В заданном текстовом файле заменить группы символов 'один ',
'два', 'три' соответственно на '1', '2' и '3', оставив остальные
символы
без изменения .
20. Дан текстовый файл, строки которого содержат названия партий и
количества полученных голосов . Определить партии, набравшие более
5% голосов .
21. Дан текстовый файл, содержащий символьное представление
целых чисел без знака,
разделенных пробелами. Отсортировать его в
порядке возрастания представляемых чисел .
22. Дан текстовый файл, содержащий символьное представление
целых чисел без знака, разделенных пробелами. Найти наибольшее из
чисел , представленных в файле.
23. Описать процедуру вычисления скалярного произведения первой
из строк целочисленной матрицы , содержащих хотя бы один нулевой
элемент, на первый из столбцов , не содержащих ни одного нулевого
элемента. Применить эту процедуру к матрице 4х4, компоненты
которой хранятся в текстовом файле MATRIX.
ZList_AddFirst ( L, E );
Write( 'Введите значение элемента, добавляемого ','в конец списка: ' );
ReadLn( E );
if isB then
BList_AddLast ( L, E )
else
ZList_AddLast ( L, E );
Write( 'Элементы списка: ' ); (* Печать списка *)
if isB then
BList_Print ( L )
else
ZList_Print ( L );
(* Переворот списка *)
if isB then BList_Invert ( L )
else ZList_Invert ( L );
Write( 'Элементы списка в обратном порядке: ' );
(* Печать списка *)
if isB then BList_Print ( L )
else ZList_Print ( L );
Write( 'Введите значение элемента, удаляемого ', 'из списка: ' );
ReadLn( E );
if isB then
begin
DelMessage( BList_DelElem1 ( L, E ) );
Write( 'Введите значение элемента, удаляемого ', 'из списка: ' );
ReadLn( E ); DelMessage( BList_DelElem2 ( L, E ) )
end
else DelMessage( ZList_DelElem ( L, E ) );
Write( 'Элементы списка: ' ); (* Печать списка *)
if isB then BList_Print ( L )
else ZList_Print ( L );
List_Clear ( L );
WriteLn( 'Элементы списка удалены ' );
Write('Нажмите <Enter> ... '); ReadLn
end;
begin
WriteLn( 'Список без заглавного звена' );
Test( True );
WriteLn( 'Список с заглавным звеном ' );
Test( False );
end.
10 39 
14. Дан текстовый файл, состоящий из слов, разделенных пробелами.              ZList_AddFirst ( L, E );
Вывести слова, которые содержат в своем составе, по крайней мере,            Write( 'Введите значение элемента, добавляемого ','в конец списка: ' );
две повторяющиеся буквы.                                                     ReadLn( E );
                                                                             if isB then
15. Дан текстовый файл, состоящий из слов, разделенных пробелами.              BList_AddLast ( L, E )
Определить буквы, которые присутствуют во всех словах                        else
одновременно.                                                                  ZList_AddLast ( L, E );
                                                                             Write( 'Элементы списка: ' ); (* Печать списка *)
16. Дан      текстовый     файл, состоящий          из   предложений,        if isB then
заканчивающихся точкой. Построить новый текстовый файл, в                      BList_Print ( L )
котором каждое предложение помещено в одну его строку.                       else
17. В заданном текстовом файле заменить символы текста '1','2','3' на          ZList_Print ( L );
группы символов 'один', 'два', 'три' соответственно, оставив остальные       (* Переворот списка *)
символы текста без изменения.                                                if isB then BList_Invert ( L )
                                                                            else ZList_Invert ( L );
18. Два заданных отсортированных текстовых файла содержат                    Write( 'Элементы списка в обратном порядке: ' );
символьные представления целых чисел без знака, разделенные                  (* Печать списка *)
пробелами. Объединить эти два файла в один, сохраняя                         if isB then BList_Print ( L )
упорядоченность.                                                             else ZList_Print ( L );
                                                                             Write( 'Введите значение элемента, удаляемого ', 'из списка: ' );
19. В заданном текстовом файле заменить группы символов 'один',              ReadLn( E );
'два', 'три' соответственно на '1', '2' и '3', оставив остальные символы     if isB then
без изменения.                                                                begin
                                                                               DelMessage( BList_DelElem1 ( L, E ) );
20. Дан текстовый файл, строки которого содержат названия партий и             Write( 'Введите значение элемента, удаляемого ', 'из списка: ' );
количества полученных голосов. Определить партии, набравшие более              ReadLn( E ); DelMessage( BList_DelElem2 ( L, E ) )
5% голосов.                                                                   end
                                                                             else DelMessage( ZList_DelElem ( L, E ) );
21. Дан текстовый файл, содержащий символьное представление                  Write( 'Элементы списка: ' ); (* Печать списка *)
целых чисел без знака, разделенных пробелами. Отсортировать его в            if isB then BList_Print ( L )
порядке возрастания представляемых чисел.                                    else ZList_Print ( L );
                                                                             List_Clear ( L );
22. Дан текстовый файл, содержащий символьное представление                  WriteLn( 'Элементы списка удалены' );
целых чисел без знака, разделенных пробелами. Найти наибольшее из            Write('Нажмите  ... '); ReadLn
чисел, представленных в файле.                                             end;
                                                                           begin
23. Описать процедуру вычисления скалярного произведения первой              WriteLn( 'Список без заглавного звена' );
из строк целочисленной матрицы, содержащих хотя бы один нулевой             Test( True );
элемент, на первый из столбцов, не содержащих ни одного нулевого             WriteLn( 'Список с заглавным звеном' );
элемента. Применить эту процедуру к матрице 4х4, компоненты                 Test( False );
которой хранятся в текстовом файле MATRIX.                                 end.

                                 10                                                                              39

Страницы