Презентация "Символьные массивы"

СИМВОЛЬНЫЕ МАССИВЫ Кроме символьных величин в Паскале могут использоваться символьные массивы, элементами которых являются группы символов.

Кроме символьных величин в Паскале могут использоваться символьные массивы, элементами которых являются группы символов.
Символьный массив отличается от числового только значением входящих в него элементов: числовой массив в качестве элементов имеет числовые выражения, символьный – строковые (символьные).

Примером одномерного массива служит список класса, где фамилия и имя ученика – элементы массива, а размер массива – число учеников в классе.

Примером одномерного массива служит список класса, где фамилия и имя ученика – элементы массива, а размер массива – число учеников в классе.
Ввод и вывод элементов символьного массива осуществляются аналогично вводу и выводу элементов числового массива.
После того, как данные введены в массив, ими можно оперативно распоряжаться. Доступен любой элемент массива. Достаточно только указать его индекс.

Задача 1:

Введите массив строк из N элементов, напечатайте элементы массива в прямом и обратном порядке.

Program prim1;

Задача 2:

Program prim2;

Задача 3:

Program prim3;

Задача 4(самостоятельно)

Задача 5:

Перепишите фамилии учащихся в случайном порядке.
Решение: Зададим массив B(N) фамилиями учащихся. Затем найдем N целых чисел в пределах от 1 до N и занесем их в массив A. Далее распечатаем последовательно элементы массива B(A(I)).

Program prim5;

Задача 6:

Дана строка, состоящая из нескольких слов, между словами стоит один пробел, в конце предложения – точка. Подсчитать количество слов и вывести на экран только те из них, которые начинаются с буквы «а» (слов не больше 30).
Решение: разобьем предложение на отдельные слова, и каждое будем хранить как элемент массива.

Program prim6;

Program prim6;
uses crt;
const n=30;
var b: array[1..n] of string;
st: string[255]; k,i: integer;
begin
clrscr;
write (‘st=‘); readln (st);
k:=1;
{Пока не встретится пробел, формируем очередное слово k, прибавляя по одной букве}
for i:=1 to length(st) do
if st[i]<>’ ‘ then b[k]:=b[k]+st[i] else
{Если это не последний символ, то увеличиваем счетчик слов и начинаем формировать соответствующий элемент массива}
if i<>length(str) then begin
k:=k+1; b[k]:= ‘’
end;
writeln (‘k=‘,k);
{Просматриваем все слова, если первый символ очередного слова равен букве «а», то выводим его}
for i:=1 to k do
if copy(b[i],1,1)=‘a’ then write (i,’-‘,b[i],’ ‘)
readln
end.

Задача 7:

Если длина строки нечетное число, то удалить среднюю букву.
Решение: Пусть k – это длина строки, если оно нечетное, то надо удалить средний символ, а его номер равен kDiv2+1.

Program prim7;

Задача 8:

Program prim8;