Всем нам приходится - кому реже, кому чаще - повторять одни и те же действия и операции в Excel. Любая офисная работа предполагает некую "рутинную составляющую" - одни и те же еженедельные отчеты, одни и те же действия по обработке поступивших данных, заполнение однообразных таблиц или бланков и т.д. Использование макросов и пользовательских функций позволяет автоматизировать эти операции, перекладывая монотонную однообразную работу на плечи Excel. Другим поводом для использования макросов в вашей работе может стать необходимость добавить в Microsoft Excel недостающие, но нужные вам функции. Например функцию сборки данных с разных листов на один итоговый лист, разнесения данных обратно, вывод суммы прописью и т.д.
Объяснение:
понятно???
PascalABC.NET 3.5.1
begin
var a := ReadString().ToCharArray.ToList; //Читаем с консоли число как строку, разбиваем на массив символов и приводим к типу List<T> для удобства работы
var fnum := a[0]; //Запишем в переменную fnum первый элемент получившегося списка цифр нашего числа (то бишь первую слева цифру)
a.Remove(fnum); //Удалим из этого списка эту цифру
a.AddRange(Seq(fnum, fnum)); //Добавим в конец нашего списка цифр эту самую последнюю цифру два раза
a.JoinIntoString.Println; //Соберём элементы нашего списка в строку и выведем на печать
end.
Объяснение:
