5. рассмотрите изображение. напишите алгоритм действий для того, чтобы подизображением можно было вставить текст, например рис.1 ​

Информация    для человека    - это содержание  сигналов  (сообщения), воспринимаемых человеком непосредственно или с специальных устройств, расширяющее его знания об окружающем мире и протекающих в нём процессах. сигналы могут быть непрерывными или дискретными. непрерывный    сигнал    принимает    бесконечное    множество    значений    из  некоторого    диапазона.    между    значениями,    которые    он    принимает,    нет    разрывов. дискретный    сигнал  принимает    конечное число значений.    все    значения  дискретного сигнала    можно пронумеровать    целыми числами. но я не уверен что правильно 

// pascalabc.net 3.0, сборка 1073 const   sb='bcdfgjklmnpqrstvwxz';   s='computer programming is a process of computer programs creation'; var   i,n: integer;   s1,sn,t: string; begin   i: =1;   while s[i]< > ' ' do inc(i);   s1: =copy(s,1,i-1);   n: =length(s); i: =n;   while s[i]< > ' ' do dec(i);   sn: =copy(s,i+1,n-i);   t: ='';   for i: =1 to length(s1) do       if pos(s1[i],sb)> 0 then t: =t+s1[i];   s1: =t;   t: ='';   for i: =1 to length(sn) do       if pos(sn[i],sb)> 0 then t: =t+sn[i];   sn: =t;   t: ='';   for i: =1 to length(s1) do       if pos(s1[i],sn)> 0 then           if pos(s1[i],t)=0 then t: =t+s1[i];   for i: =1 to length(t) do write(t[i],' ');   writeln end.   тестовый прогон: t r 2. "нормальное" решение// pascalabc.net 3.0, сборка 1073 const   sb='bcdfgjklmnpqrstvwxz';   s='computer programming is a process of computer programs creation'; begin   var a: =s.towords(' ');   a[0].intersect(a[a.length-1]).where(x-> pos(x,sb)> 0).println(',') end. тестовый прогон: t,r