переместите значение c в рамки с соответствующими результатами выражения

программа №4program str999; uses crt; var s: string; begin writeln('введіте фразу'); read(s); if (s='край озер') then writeln ('край озер лесов и рек'); if (s='я учусь в школе') then writeln ('я учусь в 10-м классе') end. №5program p_1; uses crt; var s: string; begin writeln('введите фразу'); read(s); if (s='моя родина беларусь') then writeln ('беларусь моя родина'); if (s='люблю цябе мой родны кут') then writeln ('мой родны кут люблю цябе')  end. 

фамилия

                  имя

          отчество

в одном байте восемь бит. следовательно 100/8=12.5   ответ 12.5

пщояк 17 27 16 33 17

нщёп 15 27 7 17