Что будет напечатано на экране в результате данного фрагмента ​

Program e02;   uses crt;     var s: string;         i,n,k: integer; begin   clrscr;   writeln('введите строчку: ');   readln(s);       k: =0;       for i: =1 to length(s) do     if s[i] = '9' then       k: =i;         if k < > 0 then     writeln('yes 9! ')   else     writeln('no 9! ');         if k = length(s) then     writeln('да есть 9 в конце строки! ')   else     writeln('нет 9 в конце строки! '); end.

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