ввести две фамилии.определить какая фамилия имеет большую длину.результат вывести в виде: Фамилия "Иваненко" имеет больше символов чем "Петров".

ОТДЕЛ Задание+;ИСПОЛЬЗУЕТ Вывод ИЗ "...\Отделы\Обмен\", Приём;ПЕР  ф1, ф2: РЯД 50 ИЗ ЗНАК;УКАЗ  Вывод.Цепь("Введите первую фамилию: ");  Приём.Строка(ф1);  Вывод.Цепь("^Введите вторую фамилию: ");  Приём.Строка(ф2);  ЕСЛИ ДЛИНА(ф1) > ДЛИНА(ф2) ТО    Вывод.Цепь('Фамилия "');    Вывод.Цепь(ф1);    Вывод.Цепь('" имеет больше символов, чем "');    Вывод.Цепь(ф2);    Вывод.Цепь('".')  АЕСЛИ ДЛИНА(ф1) < ДЛИНА(ф2) ТО    Вывод.Цепь('Фамилия "');    Вывод.Цепь(ф2);    Вывод.Цепь('" имеет больше символов, чем "');    Вывод.Цепь(ф1);    Вывод.Цепь('".')  ИНАЧЕ    Вывод.Цепь("Фамилии одинаковой длины.")  КОНКОН Задание.