Язык программирования Pascal. Регулярные типы данных. Васильев В.В - 7 стр.

UptoLike

7
For i:=Jan to Dec do
case i of
Jan,Mar,May,Jul,Aug,Oct,Dec: kd[i]:=31;
Feb:kd[i]:=29
else kd[i]:=30
end;
{Распечатка массива kd}
k:=0;
Writeln('Номер месяца и количество дней в нем :');
For i:=Jan to Dec do
begin k:=k+1;
Writeln(k,' - ',kd[i])
end;
readkey
End.{Number_days}
Стандартными задачами обработки информации в массивах является сор -
тировка (упорядочивание) элементов и поиск нужных элементов. В задачах 2-4
мы разберем три стандартных алгоритма сортировки элементов массива : сор -
тировку выбором, сортировку обменом и сортировку вставками.
Задача 2. С помощью сортировки вы -
бором упорядочите массив А из N (
100
)
случайных чисел по неубыванию .
Сортировка выбором заключа-
ется в перенесении максимальных элемен-
тов на i-е место в массиве , где i = N,N-1, ,2.
Для каждого i максимальный элемент оты -
скивается с первого по i-й элемент.
На первом шаге отыскивается макси-
мальный элемент и переносится в конец
массива. Потом отыскивается максималь-
ный среди всех элементов, кроме послед-
него (последний элемент уже на своем
месте), и переносится на предпоследнее
место в массиве и т. д.
При написании блок- схемы и про-
граммы к задаче 2 мы используем соз-
данную ранее блок- схему и программу, за-
полняющую массив случайными числа-
ми и выводящую элементы массива на экран (см. стр. 4-5).
Переменные i, j используются как параметры циклов. n количество эле-
ментов в массиве . g1,g2 границы диапазона значений элементов массива. max
максимальный элемент на i-м шаге. m номер максимального элемента на i-м
шаге. а массив из 100 целых чисел .