Даны два слова. Слова состоят из чётного количества символов. Получите третье

Даны два слова. Слова состоят из чётного количества знаков. Получите третье слово, которое состоит из первой половины первого слова и 2-ой половины второго слова. К примеру: ввод: тело, кома; вывод: тема. (ПАСКАЛЬ)

Задать свой вопрос
1 ответ
var s1, s2, s3: string; L1, L2: integer; begin s1 := тело; s2 := кома; L1 := Length(s1) div 2; L2 := Length(s2) div 2; s3 := Copy(s1, 1, L1 ); s3 := s3 + Copy(s2, Length(s2) - L2+1, L2); end. Функция "Length(s1)" возвращает длину строчки "s1", т.е. сколько знаков содержит эта строчка. Операция "Length(s1) div 2" разделяет длину строчки "s1" на два без остатка, т.е. получаем половину длины строчки "s1". В переменных L1 и L2 бережём половину длины строк "s1" и "s2". Функция "Copy(s1, 1, L1 )" отдаёт часть начальной строки "s1", длиной "L1" символов, начиная с знака под номером "1". Т.е. отдаёт символы с первой половины строчки. Функция Copy(s2, Length(s2) - L2+1, L2) отдаёт половину исходной строчки "s2", начиная с середины строчки. Т.е. отдаёт знаки со 2-ой половины строчки.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт