В начале просмотра присвоим некоторой
паре, если они стоят неправильно:
5,3,2,4,1 > 5,3,2,1,4 > 5,3,1,2,4 > 5,1, 3,2,4 > 1,5,3,2,4
В начале просмотра присвоим некоторой логической переменной значение true:
p:=true; если при просмотре пар была хотя бы одна перестановка, изменим значение логической переменной на противоположное: p:=false; это означает, что последовательность еще не была упорядочена и просмотр пар надо повторить. Цикл просмотров заканчивается, если после очередного просмотра выполняется условие: p=true. Последовательность зададим в программе как константмассив
из 10 элементов - целых чисел.
Программа 10
program bubble; '
const a:array[l..10] of integer=(19,8,17,6,15,4,13,2,11,0);
var b,i:integer; p :boolean;
begin c1rscr;
for i:=l to 10 do write(a[i]:3);writeln;writeln;
repeat p:=true;
for i:=10 downto 2 do
if a[i]<a[i-l]
then begin
b:=a[il;a[i]:=a[i-l]; ali-1]:=b;p:=false
end
until p=true;
for i:=l to 10 do write(a[i]:3);
writeln
end.
Обработка элементов двумерных массивов (матриц) обычно выполняется с помощью двойного цикла. Один цикл управляет номером строки, другой - номером столбца.
При решении задач на ЭВМ часто возникает необходимость в использовании последовательностей символов. Такую последовательность можно описать как массив символов, однако в Паскале для таких целей имеется специальный тип - string[n] -
строка из n символов, где n <= 255. Способы описания переменных - строк - аналогичны описанию массивов.
1. Строковый тип определяется в разделе описания типов, переменные этого типа - в разделе описания переменных:
type word : string[20];
var a,b,c : word;
2. Можно совместить описание строкового типа и соответствующих переменных в разделе описания переменных:
var a,b,c : string[20];
d : string[30];
3. Можно определить строковую переменную и ее начальное значение как
констант-строку:
const l:string[l 1]='информатика';
Символы, составляющие строку, занумерованы слева направо; к ним можно обращаться с помощью индексов, как к элементам одномерного массива.
Содержание Назад Вперед
Forekc.ru
Рефераты, дипломы, курсовые, выпускные и квалификационные работы, диссертации, учебники, учебные пособия, лекции, методические пособия и рекомендации, программы и курсы обучения, публикации из профильных изданий