Символьні змінні і рядки

У мові Turbo Pascal 7.0 існує стандартний тип даних, який називається символьним, - char. Цей тип є порядковим, і значення символьних змінних можуть порівнюватися між собою.

До символьним змінним відносяться всі великі латинські літери 'А', 'В', 'С'. 'Z', рядкові 'а', 'b', 'з'. 'Z', цифри "0", "1, '2'. '9', знаки пунктуації, всілякі дужки, українські літери і т. Д. У програмах їх значення завжди полягають в апострофи. Усередині кожного такого ряду коди символів впорядковані: 'А' <'В' <'С' <. <'Z' и т. д. ASCII-коды всех строчных букв меньше всех заглавных.

Для роботи з таким типом даних, як і для інших порядкових типів, часто використовуються функції, аргументи яких можуть бути символьними змінними:

pred () - попереднє значення, наприклад pred ( 'B') = 'A'; succ () - наступне значення, наприклад succ ( 'a') = 'b'; ord () - числове значення коду, наприклад ord ( '7') - ord ( '0') = 7.

Для рядків виконуються операції порівняння>, <,>=,<=, например, 'viv'<'viva', и объединения (конкатенации) +:

Порівняння рядків здійснюється зліва направо відповідно до ASCCII кодами відповідних символів.

По суті, рядок довжини k являє собою масив з k + 1 символьних змінних, де нульовий елемент зберігає значення довжини рядка: string [k] = arrray [0..k] of char;

Для роботи з рядками в Turbo Pascal 7.0 використовуються наступні спеціальні функції і процедури:

CONCAT (STR1, STR2) - об'єднання рядків STR1 і STR2;

LENGTH (STR) - повертає довжину рядка STR;

POS (CONTEXT, STR) - повертає номер позиції, починаючи з якої розташовується підрядок CONTEXT в рядку STR;

DELETE (STR, I, J) - видаляє з рядка STR J символів починаючи з позиції I;

INSERT (CONTEXT, STR, I) - вставляє підрядок CONTEXT в рядок STR починаючи з позиції I;

STR (N, STR) - перетворює число N в строкову змінну STR;

VAL (STR, X, CODE) - перетворює рядок STR в двійкове число X, де CODE - код неправильного символу.

П р и м і р 2. Написати програму, яка видаляє пробіли на початку введеної з клавіатури рядка.

write ( 'Введіть рядок:'); readln (str);