Символьные и строковые величины

Команды ввода

Read(x,y) – ввод значений переменных x, y. Числовые значения могут

Команды вывода

Write(x,y) – вывод значений переменных x, y. Разделитель между значениями

Команды вывода

Writeln(’введите два числа’) – вывод строковой константы, значение которой записано

Команда ветвления

Полная форма
If <условие> then
<команда 1>
Else
<команда 2>;

Сокращенная форма
If <условие> then

Команда цикла

Цикл с предусловием
While <условие> do
<команда>

Цикл с параметром
For i:=A to

Описание символов и строк

Значения строковых и символьных констант записываются в апострофах:
C:=’$’;
S:=’Привет’;
Writeln

Задание 1

Написать программу, которая выведет на экран слово Привет.

Разбор задания 1

Поскольку программа должна вывести постоянную величину (слово Привет), то

Задание 2

Напишите программу, которая спросит имя пользователя, а затем поздоровается с

Разбор задания 2

Программа:
var imja:string;
begin
writeln ('Как тебя зовут? ');
readln(imja);
writeln

Правило сравнения символов

Символы сравниваются в порядке, называемом лексикографическим.
Это порядок

Символы русского алфавита, набранные в одном регистре упорядочены в алфавитном порядке;
’Б’<’Д’;

Большие буквы русского алфавита меньше маленьких букв русского алфавита;
’Б’<’б’; ’Я’<’а’
Большие буквы

Символы цифр расположены в порядке возрастания их числовых значений;
’1’<’5’; ’0’<’9’
Символы цифр

Символы латинских букв меньше символов русских букв;
’z’<’б’; ’W’<’Ц’; ’D’<’ж’; ’q’<’Я’
Символы различных

Правило сравнения строк

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

Примеры сравнения строк

Программа сравнения двух символов

var a,b:char;
begin
writeln('введите первый символ');
readln(a);
writeln('введите второй

Функции для работы с символами

Задача 3

Определить код введенного символа.

Программа:

var c:char;
x:integer;
begin
writeln('введите символ');
readln(c);
x:=ord(c);
writeln('код=',x);
end.

Функции работы со строками и символами

Примеры использования функций.

Дано слово. Вывести на экран его последний символ

var c:char;
s:string;
n:byte;
begin

Определение позиции символа

Первый символ: s[1];
Второй символ: s[2];
Предпоследний символ: s[length(s)-1];
Средний символ: s[length(s)

Дано слово. Вывести его по одному символу в строке.

uses graphABC;
var s:string;
n,i:byte;
begin

В программу внесли следующие изменения:
for i:=1 to n do
begin
write (s[i]);
if i