Program test;
var s,s1:string;z:boolean;
begin
readln(s);
readln(s1);
z:=s.Contains(s1);
if z = true then writeln('В слове "',s,'" содержиться слово "',s1,'".')
else writeln('В слове "',s,'" не содержиться слово ',s1,'".');
<span>end.</span>
Легко: exbnrh' это английская кодировка
Деловая бумага
подтверждает факт или письмо
на нём есть печать
он завершён подписью