Ответы на вопрос:
Var s1,s2: string; len: integer; begin readln(s1); readln(s2); len: =length(s1) div 2; s1: =copy(s1,1,len)+copy(s2,len+1,len); writeln(s1); end.
Популярно: Информатика
-
Можете написать решение нажмите на фотку и она откроется !...
pandapurple28.12.2021 17:07 -
Антивирустын бірі: А) Dr Web В)Windows С)Paint Д) WinRar...
Тигрица57412.02.2020 21:33 -
Задание ниже. с информатикой((...
Medvedi4708.05.2020 09:18 -
Нужна в pascal 13. Дано трехзначное число. В нем зачеркнули первую слева...
ghostridermen08.04.2020 12:37 -
Які програми належать до систем програмування? Наведіть приклади...
anyaternovskay09.10.2022 16:42 -
На 5. Объясните значение слов «идентификация», «организация», «реорганизация»,...
dimka2zab22.01.2023 08:07 -
Програмированние на Unity Надо написать скрипт, что при клике на объект,...
Zen20116.03.2021 21:57 -
Жасанды акпарат козине жататындар 2.Табиги акпарат козине жататындар...
timatima200027.10.2022 20:36 -
Задача 1. Язык математики Что нужно сделать Маше для защиты курсовой...
Maksikar17.11.2022 18:35 -
Десятичное число 511 записано в системе счисления с основанием n (n 1)....
hjhjhjhhhhhhh14.04.2022 12:50