М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
nzotov299
nzotov299
20.01.2023 23:00 •  Информатика

пользователь вводит с клавиатуры 3 переменных real , и получает на экран квадратные кубы этих переменных на паскале)

👇
Открыть все ответы
Ответ:
aiiiiiidana
aiiiiiidana
20.01.2023

несколько кликов и конечно же при использовании любимого всеми фотошопа.  Примером послужит флаг ... и вот результат работы градиента и инструмента wave

Сделать легко и быстро из стандартного изображения достаточно реалистичную картину. Для этого нам понадобиться немного времени и умения работать в фотошопе с вашей стороны и легкий инструктаж действий в моей стороны ;)   Начнем?

Итак, что мы имеем. Для начала нужно найти картинку над которой будем работать. В моем случае, да и в соответствии с топиком, нужна картинка флага!  Где достать?  - просто поискать в бездонной сети интернет, там достаточно ресурсов, чтоб удовлетворить даже самый "придирчивый взгляд" ;) Либо просто рисуем сами!


Шаг 1. Источник-картинка для дальнейшей работы

Теперь необходимо зайти в редактор градиентов, используя значёк  на панели инструментов и настройте следующий градиент


Шаг 2. Настройка градиента для заливки

Теперь выполним следующие действия. Создайте новый слой, используя комбинацию клавиш Cntr+Shift+N, или через меню [Layer->New->Layer..]. Теперь перейдите на слой, где у вас находиться исходная картинка. Выделите её по контуру и вернитесь на новый слой. Выполните заливку выделенной области по горизонтали. У вас градиент должен перекрыть только ту часть, где находиться исходная картинка. Иначе мы не получим нужного результата.

Уменьшите прозрачность у слоя с градиентом до 30%  и объедините два слоя в один. Для этого надо выделить нужные слои и выполнить команду Merge Layers из контекстного меню или из стандартного. В результате вы получите вот такую псевдо-объемную картинку, состоящую из 2х слоев


Шаг 3. Заливка градиентом, изменение прозрачности и объединение слоев

Осталось только выполнить эффект ветра по ткани. Для этого нам подойдет фильтр Wave(в переводе означает волна =). Выберите наш получившийся слой и откройте редактор настроек Wave через меню [Filter->Discort->Wave].  Поставте настройки в соответствии с ниже приведенным скрином


Шаг 4. Настройка фильтра Wave[Волна]

Жмите кнопку "Randomize" до получения результата в окне привью чуть выше, который вас устроит! =) Как только получите его, смело жмите ОК. Вуаля, наш эффектный развевающийся флаг готов!


Вот и результат

4,7(8 оценок)
Ответ:
nastya2734
nastya2734
20.01.2023
// PascalABC.NET 3.2, сборка 1334 от 12.11.2016
begin
  var a:=ReadlnString('->').ToWords;
  a.Select((x,i)->(x,x.Length,i)).OrderByDescending(x->x[1]).
    ThenBy(x->x[0]).Select(x->x[0]).Println
end.

Пример
-> Карл у Клары украл кораллы Клара у Карла украла кларнет
кларнет кораллы украла Карла Клара Клары украл Карл у у

// PascalABC.NET 3.2, сборка 1334 от 12.11.2016
begin
  var s1:='';
  var s2:='';
  var s:=ReadlnString('->');
  var p:integer;
  for var i:=1 to s.Length do begin
    p:=pos(s[i],s1);
    if p>0 then s[i]:=s2[p]
    end;
  Writeln(s)
end.

Пример
-> abracadabra
deudfdgdeud
4,4(79 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ