If Pos('MA', 'MAMA') = 3 then 
  write('Что-то у нас не то набрано! Наверное перепутали кириллицу и латиницу в слогах слова "MAMA"!');
  
  
If Pos('MA', 'MAMA') = 0 then 
  write('Что-то у нас совсем не то набрано! Наверное перепутали кириллицу и латиницу в аргументах!');