Составить программу в pascal a) сравнить строки «умница» и «умник». b) с клавиатуры вводят две строки. определить, какая строка больше первая или вторая.

// PascalABC.NET 3.0, 1064

a) 
begin 
  if ('УМНИЦА' > 'УМНИК') then   
    write('УМНИЦА больше') 
  else if ('УМНИЦА' < 'УМНИК') then 
    write('УМНИК больше') 
  else   
    write('УМНИЦА = УМНИК');
end.

б) Приложение