1.используя функцию вырезки подстроки и операцию конкатенации из слова "операция" получить слово "перо". 2. определить длину символьной строки "ноутбук" решиите ! ато я эти темы : с

var s,s1,s2,s3:string;
i,q:integer;
begin
s:='ноутбук';
s1:='операция';
s2:='операция';
Delete(s1,5,4);
Delete(s1,1,1);
Delete(s2,2,7);
s3:=concat(s1,s2);
for i:=1 to length(s) do inc(q);
writeln(q);
writeln(s3);
end.