Составить программы на паскале. ( темы: строковой тип, числовые функции) 1) из слова лекарство получить слова лево и лето. 2) используя процессы получить замену: нитка-нерка-норка-крика-книга-пурга. 3) используя переменные: a: =кормила b: =ку c: =ка d: =ш e: =он f: =(пробел) получить предложение: кукушка кормила кукушонка.

PascalABC.NET
1)
var 
a:String = 'лекарство'; 
b,c,d:String;
begin
b:= copy(a,1,2);
c:= copy(a,7,1)+copy(a,9,1);
d:= copy(a,8,2);
WriteLn(b+c);
WriteLn(b+d);
end.

2)
var a:String = 'нитка';
begin
WriteLn(a);
a:= a.Replace('ит','ер');
WriteLn(a);
a:= a.Replace('е','о');
WriteLn(a);
a:= a.Replace('нор','кри');
WriteLn(a);
a:= a.Replace('рик','ниг');
WriteLn(a);
a:= a.Replace('кни','пур');
WriteLn(a);
end.

3)
var a,b,c,d,e,f:String;
begin
a:='кормила';
b:='ку';
c:='ка';
d:='ш';
e:='он';
f:=' ';
WriteLn(b+b+d+c+f+a+f+b+b+d+e+c);
end.