Блок-схема алгоритма решения задачи c блоками «предопределенный процесс»

 

 

Тестовые данные
№	Исходные данные	Результат
	a - матрица размера 5´4	Число упорядоченных строк k

Текст программы

Program Rows_number;

Const m =5;

n =4;

type t_diap =1.. n;

t_row =array[ t_diap ] of integer;

t_matr =array[1.. m ] of t_row;

procedure read_matr (var a: t_matr);

var i, j: byte;

begin

for i:=1 to m do

for j:=1 to n do

read (a [ i, j ]);

end;

function sort_arr (const a: t_matr): boolean;

var i: t_diap;

begin

i:=2];

while (i <= n)and(a [ i -1]<= a [ i ]) do

i:= i +1;

sort_arr:= i > n

end;

var a: t_matr;

i, k: byte;

min: integer;

begin

write (‘Введите матрицу ’, m,’´’, n);

read_matr (a);

k:=0;

for i:=1 to m do

if sort_arr (a [ i ]) then k:= k +1;

if k >0 then

writeln (‘Число упорядоченных строк=’, k)

else

writeln (‘Упорядоченных строк нет’)

end.

СОДЕРЖАНИЕ

Введение …………………………………….………………….…….3

Лабораторная работа № 1
Программирование алгоритмов линейной структуры ……….…… 3

Лабораторная работа № 2
Программирование алгоритмов разветвляющейся структуры.….. 9

Лабораторная работа № 3
Программирование алгоритмов циклической структуры ……….. 13

Лабораторная работа № 4
Обработка одномерных массивов с использованием подпрограмм..16

Лабораторная работа № 5
Использование подпрограмм при работе с двумерными массивами. 20

Лабораторная работа № 6
Обработка символьных строк …………..…..…............................... 24

Лабораторная работа № 7
Использование рекурсивных процедур и функций ….…....……… 27

Лабораторная работа № 8

Использование комбинированного типа ……………..……..…..… 30

Лабораторная работа № 9
Побитовые операции языка Паскаль ……………………..………. 33

Лабораторная работа № 10

Использование множественного типа ………………………….…. 36

Лабораторная работа № 11

Обработка текстовых файлов …...……………………………….… 39

Лабораторная работа № 12

Обработка типизированных файлов …...…………………..……… 42

Лабораторная работа № 13

Преобразование типов …………………………………..…….…… 46

Лабораторная работа № 14

Обработка матриц произвольного порядка с фиксированным
базовым типом ……………….……………………………….….… 50

Лабораторная работа № 15

Динамические переменные ……..……………………..………...… 55

Лабораторная работа № 16

Обработка списков ………………………….…..……………….… 59

Лабораторная работа № 17

Использование подпрограмм с параметрами процедурного

типа и нетипизированными параметрами ………………..………. 63

Приложение ……….………………………………………….……..64