Стандартные процедуры и функции для работы с символьными и строковыми величинами

Стандартные процедуры и функции для работы с символьными и строковыми величинами

Цели урока:

• закрепление материала предыдущего урока;

• формирование умений использования стандартных процедур и функций обработки символьных переменных;

• развитие познавательного интереса, логического и алгоритмического мышления; самооценки, навыков самоконтроля.

Тип урока: урок усвоения новых знаний.

Учащиеся должны знать: понятие символьных величин.

Учащиеся должны уметь: применять стандартные процедуры и функции обработки символьных переменных.

Ход урока:

1. Организационный момент;

2. Актуализация знаний;

3. Объяснение нового материала;

   Имя процедуры, функции	Типа параметров	Описание
   Length (s)	s – string	Вычисляет длину строки s
   Copy (s, k, n)	s – string; k, n – integer	Копирует n символов строки s, начиная с позиции k
   Delete (s, k, n)	s – string; k, n – integer	Удаляет в строке s N символов, начиная с позиции k
   UpCase (c)	c - char	Преобразует символ с к верхнему регистру
   LowCase (c)	c - char	Преобразует символ с к нижнему регистру
   UpperCase (s)	s – string	Преобразует строку s к верхнему регистру
   LowукCase (s)	s – string	Преобразует строку s к нижнему регистру
   Trim (s)	s – string	Удаляет пробелы в начале и конце строки s
   TrimLeft (s)	s – string	Удаляет пробелы в строки s
   TrimRight (s)	s – string	Удаляет пробелы в конце строки s

4. Выполнение практических заданий;

Задание 1. Составьте программу, которая определяет количество символов во введенной строке.

program primer1;

var

s: string;

k: integer;

begin

writeln ('Введите строку');

readln (s);

k:= Length (s);

writeln ('Длина строки ' ,k);

end.

Задание 2. Составьте программу, которая предлагает ввести с клавиатуры две строки s и t и выводит на экран более линую строку.

program primer2;

var

s,t: string;

k, n: integer;

begin

writeln ('Введите строку s');

readln (s);

writeln ('Введите строку t');

readln (t);

k:= Length (s);

n:= Length (t);

if kn then writeln (s) else writeln (t);

end.

Задание 3. Составьте программу, которая определяет, равны ли длины строк s и t. Строки вводятся с клавиатуры. Ответ должен быть «Да» или «Нет».

program primer3;

var

s,t: string;

k, n: integer;

begin

writeln ('Введите строку s');

readln (s);

writeln ('Введите строку t');

readln (t);

k:= Length (s);

n:= Length (t);

if k=n then writeln ('Да') else writeln ('Нет');

end.

1. Домашнее задание: 5