Даже сейчас много того что люди делали раньше начали делать машины , роботы например : раньше люди сами толкали камни а сейчас это делает машина , доктора раньше мы к ним ходили , а сейчас ищем по симптомам свою болезнь . Мне кажется то что можно заменить профессию официанта вместо официантов оставить роботов так даже чаевых оставлять не надо будет , а можно вообще постоавить дорожку как начали делать во многих ресторанах
Преобразование документов в формат PDF, Djvu или PostScript.Сохранение нескольких документов в один.Преобразование документов в графические файлы, например, в JPEG или TIFF, для представления в универсальном, платформо-независимом формате.Отправка документов на сервер факсимильных сообщений.Добавление возможностей, которые не поддерживает принтер, таких как:печать нескольких страниц на одной без бордюров;печать на бланках;водяные знаки, и другое.Удалённая печать документов через Интернет.
// PascalABC.NET 3.2, сборка 1401 от 14.03.2017 // Внимание! Если программа не работает, обновите версию!
begin var s:=ReadlnString('n='); if s.ToCharArray.Any(c->not c.IsDigit) then begin Writeln('Это недопустимая запись числа'); Exit end; // задание 1 Writeln('Наименьшая цифра ',s.ToCharArray.Min); // задание 2 var n:=s.Length; var k1:=s.Where(c->c.ToDigit.IsOdd).Count; var k2:=n-k1; if k1>k2 then Writeln('Количество нечетных цифр больше, чем четных') else if k1<k2 then Writeln('Количество четных цифр больше, чем нечетных') else Writeln('Количество четных цифр равно количеству нечетных') end.
Пример n= 121245403457869237484742433 Наименьшая цифра 0 Количество четных цифр больше, чем нечетных
