For I :=32 to 255 doWrite('VV ', I :4, '-', Chr(I))
End.
Цикл в програмі починається з 32 тому, що символи з кодами від 0 до 31 є керівниками і не мають відповідного графічного представлення.
Завдання: "Визначити, чи являється введений рядок "перевертышем". Перевертышем називається такий рядок, який однаково читається з початку і з кінця. Наприклад, "козак" і "потоп" - перевертыши, "канат" - не перевертыш".
Поступимо таким чином: з введеного рядка сформуємо інший рядок з символів першою, записаних в зворотному порядку, потім порівняємо перший рядок з другим; якщо вони виявляться рівні, то відповідь позитивна, інакше - негативний. Природно, запропонований спосіб рішення не є єдино можливим.
Program Str4;Var S, B: String;I: Byte;Begin
Writeln('Введіть рядок'); Readln(S);B:=''; {Змінною B привласнюємо значення "Порожній рядок"}For I :=1 to Length(S) doB :=S[I]+B; {Конкатенація. Символи рядка S пристиковуються до}{змінній B ліворуч. Найлівішим виявиться останній.}If B=S Then Writeln('Перевертыш') Else Writeln('Не перевертыш')
End.
Число, записане в строкову змінну, природно числом не є, але дуже часто вимагається його все ж використовувати як число. Для цього треба зробити перетворення типу. Переклад строкового представлення числа в числове виконує в Паскале оператор Val.
Його формат:Val(S, X, C);
Тут S - рядок, що містить число, X - числова змінна, в яку буде поміщений результат, З - змінна цілочисельного типу, в яку поміщається першого зустрінутого в S відмінного від цифри символу. Якщо після виконання оператора Val змінна З має значення 0, то це означає, що перетворення типу пройшло абсолютно успішно і в рядку нецифрових символів не зустрілося.
Протилежну дію здійснює оператор Str. Формат оператора :Str(X, S);X - число (або арифметичне вираження), S - строкова змінна.
У змінну S потрапляє строкове представлення числа X. Це треба, наприклад, при необхідності виводити на екран числа в графічному режимі (буде вивчено пізніше), оскільки стандартні процедури виводу на екран там працюють тільки із строковими величинами.
Для ілюстрації розглянемо таке завдання: "Знайти суму цифр введеного натурального числа". Використовуючи тільки числові змінні, вирішити її можна, але пропоноване тут рішення, по-моєму, простіше.