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

UptoLike

ВУЗ: 

ВГУ | Воронеж

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

Рубрика: 

матрица хотя бы два столбца, образующие несовпадающи
е множества
чисел . Применить эту процедуру к матрице 4х4, компоненты которой
хранятся в текстовом файле MATRIX.
32. Описать процедуру для определения , содержат ли все столбцы
целочисленной матрицы одинаковые множества чисел . Применить эту
процедуру к матрице 4х4, компоненты которой хранятся в текстовом
файле MATRIX.
33. Описать процедуру для определения , образует ли каждая строка
целочисленной матрицы возрастающую последовательность.
Применить эту процедуру к матрице 4х4, компоненты которой
хранятся в текстовом файле MATRIX.
34. Описать процедуру для определения , образует ли каждый столбец
целочисленной матрицы убывающую последовательность . Применить
эту процедуру к матрице 4х4, компоненты которой хранятся в
текстовом файле MATRIX.
35. Текст представляет собой последовательность литер d1+d2-d3+d4-
..., заканчивающуюся точкой, где d1,d2,... - десятичные цифры .
Вычислить значение этой алгебраической суммы .
36. Текст представляет собой последовательность литер
d1*d2/d3*d4/d5*..., заканчивающуюся точкой, где d1,d2,... -
десятичные цифры . Вычислить значение этого выражения .
37. Дан текст, состоящий из слов , разделенных пробелами. Вывести
слова, которые содержат в своем составе, по крайней мере, две
повторяющиеся буквы .
38. Заданы 3 квадратных матрицы . Распечатать их в порядке
возрастания норм . За норму матрицы будем принимать максимальную
из сумм модулей элементов строк.
39. Даны 2 квадратных матрицы . Вывести ту матрицу, которая
является магическим квадратом. Матрица считается магическим
квадратом , если суммы элементов каждого столбца и каждой строки
одинаковы.
40. Дана квадратная матрица порядка n. Известно , что она состоит из
while L<>N
il do
begin
(* запоминаем указатель на следующий *)
H := L^.Next;
(* теперь следующим за текущим будет звено P*)
L^.Next := P; (* текущий становится предыдущим для след. шага *)
P := L; (* перемещаемся к следующему элементу списка *)
L := H
end;
L := P (* самый последний становится первым *)
end;
(* Список с заглавным звеном *)
procedure ZList_Invert (L: TList);
begin
BList_Invert ( L^.Next )
end;
{ 6. Печать элементов списка }
(* Список без заглавного звена. *)
procedure BList_Print ( L: TList );
begin
Write('< ');
while L <> Nil do
begin
Write( L^.Info );
if L^.Next <> Nil then Write(',');
L := L^.Next
end;
WriteLn(' >')
end;
(* Список с заглавным звеном *)
procedure ZList_Print (L: TList);
begin
BList_Print ( L^.Next )
end;
{ 7. Удаление всех элементов списка }
(* Список с заглавным звеном и без него *)
12 37 
матрица хотя бы два столбца, образующие несовпадающие множества        while L<>Nil do
чисел. Применить эту процедуру к матрице 4х4, компоненты которой        begin
хранятся в текстовом файле MATRIX.                                       (* запоминаем указатель на следующий *)
                                                                          H := L^.Next;
32. Описать процедуру для определения, содержат ли все столбцы           (* теперь следующим за текущим будет звено P*)
целочисленной матрицы одинаковые множества чисел. Применить эту          L^.Next := P; (* текущий становится предыдущим для след. шага *)
процедуру к матрице 4х4, компоненты которой хранятся в текстовом         P := L; (* перемещаемся к следующему элементу списка *)
файле MATRIX.                                                            L := H
                                                                        end;
33. Описать процедуру для определения, образует ли каждая строка         L := P (* самый последний становится первым *)
целочисленной     матрицы    возрастающую     последовательность.     end;
Применить эту процедуру к матрице 4х4, компоненты которой
хранятся в текстовом файле MATRIX.                                    (* Список с заглавным звеном *)
                                                                      procedure ZList_Invert (L: TList);
34. Описать процедуру для определения, образует ли каждый столбец     begin
целочисленной матрицы убывающую последовательность. Применить          BList_Invert ( L^.Next )
эту процедуру к матрице 4х4, компоненты которой хранятся в            end;
текстовом файле MATRIX.
                                                                      { 6. Печать элементов списка }
35. Текст представляет собой последовательность литер d1+d2-d3+d4-    (* Список без заглавного звена. *)
..., заканчивающуюся точкой, где d1,d2,... - десятичные цифры.        procedure BList_Print ( L: TList );
Вычислить значение этой алгебраической суммы.                         begin
                                                                       Write('< ');
36. Текст     представляет   собой    последовательность литер         while L <> Nil do
d1*d2/d3*d4/d5*..., заканчивающуюся точкой, где d1,d2,... -             begin
десятичные цифры. Вычислить значение этого выражения.                    Write( L^.Info );
                                                                         if L^.Next <> Nil then Write(',');
37. Дан текст, состоящий из слов, разделенных пробелами. Вывести         L := L^.Next
слова, которые содержат в своем составе, по крайней мере, две           end;
повторяющиеся буквы.                                                   WriteLn(' >')
                                                                      end;
38. Заданы 3 квадратных матрицы. Распечатать их в порядке
возрастания норм. За норму матрицы будем принимать максимальную       (* Список с заглавным звеном *)
из сумм модулей элементов строк.                                      procedure ZList_Print (L: TList);
                                                                      begin
39. Даны 2 квадратных матрицы. Вывести ту матрицу, которая             BList_Print ( L^.Next )
является магическим квадратом. Матрица считается магическим           end;
квадратом, если суммы элементов каждого столбца и каждой строки
одинаковы.
                                                                      { 7. Удаление всех элементов списка }
40. Дана квадратная матрица порядка n. Известно, что она состоит из   (* Список с заглавным звеном и без него *)

                               12                                                                             37

Страницы