Презентация, доклад Строки Turbo Pascal 7.0

длины (до 255 символов). Строку можно рассматривать как массив символов, однако в связи с широким использованием строк и некоторыми особенностями по сравнению со стандартными массивами они выделены в отдельный тип данных.

У типа-строки в квадратных скобках может быть указан его размер (от 1 до 255). Если размер строки не указан, он считается равным 255.

в 255 символов}
const
January: string[10] = 'Январь';

Для строк применимы операции конкатенации (+) и сравнения.

Операция конкатенации добавляет к первой строке вторую.

с ASCII-кодами соответствующих символов. Считается, что отсутствующие символы в более короткой строке имеют код меньше кода любого действительного символа. Например, 'XS' больше, чем 'Х'.
'abc' > 'ab' (true)
'abc' = 'abc' (true)
'abc' < 'abc ' (false)

строка обозначается двумя рядом стоящими апострофами (например, st := '').

Строки можно присваивать друг другу. Если максимальная длина переменной слева меньше длины присваиваемой строки, то лишние символы справа отбрасываются.

array[0..N] of Char.

Нулевой символ предназначен для указания используемого количества символов строки и может изменяться от символа с кодом 0 до символа с кодом N. С ним можно работать как и с остальными символами строки (записывать и читать его значение и т. д.), но не забывая о его основном предназначении.

элемент с номером 0, в котором в виде символа хранится длина текущей строки. Чтобы узнать текущую длину, достаточно применить функцию ord к нулевому элементу строки. Например:
…
writeln(ord(st[0]))
…

Нулевой элемент строковой переменной можно корректировать. При этом будет изменяться текущая длина строки. Например, выражение str[0]:=#50 устанавливает текущую длину равной 50.

uses crt;
var i,s:integr;
A:string;
begin
clrscr;
write('a=');readln(a) ;
for j:=1 to length(a) do
begin
if copy(a,i,1)= ' a' then s:=s+1;
end;
writeln ('s=',s);
readln;
end.