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

Водномерной числовой таблице (числа от -6 до 17) заменить все отрицательные элементы их модулями. паскаль. можно прямо программой?

👇
Открыть все ответы
Ответ:
Возможности графического редактора Photoshop от компании Adobe позволяют делать любые операции над изображениями. Начиная с рисования простых фигур и линий кистью, и заканчивая созданием сложных многослойных композиций с применением корректирующих слоёв,  эффектов наложения, фильтров и 3d объектов. С его можно выравнивать цвета и положение объектов на неправильно сделанных снимках, производить восстановление и коррекцию старых фотографий либо повреждённых изображений. Можно делать анимированные изображения, например, gif анимацию. Имея графический планшет можно рисовать настоящие картины, как если бы мы использовали обычную кисть и холст, т.к. большое разнообразие кистей и их настроек позволяет в умелых руках буквально творить чудеса. Инструменты автоматизации, подключаемые фильтры и плагины, а также ряд других профессиональных возможностей позволяют упростить многие операции, а многие делать буквально в 1 клик мыши в автоматическом режиме сразу над несколькими тысячами файлов.
4,6(45 оценок)
Ответ:
1Али
1Али
03.01.2021
Var l:char;i,n,a,k,m,d,q:integer;s:string;
label z;
begin
randomize;
writeln ('Введите количество паролей');
writeln ('Из чего состоят пароли?');
z:writeln ('1 - буквы 2 - цифры 3 - и буквы и цифры');
readln (a);
if (a<>1)and (a<>2)and (a<>3)then
begin
writeln ('Неправильный ввод. Ввести заново (0 - да / 1 - нет)?');
read (q);
if q=0 then goto z else halt;
end else
begin
writeln ('Введите количество паролей: ');
readln (n);
writeln ('Введите длину пароля: ');
readln (k);
writeln ('Пароли:');
if a=1 then
begin
for i:=1 to n do
begin
for d := 1 to k do
s:=s+chr(random(26)+97);
writeln(s);
s:='';
end;
end;
if a=2 then
begin
for i:=1 to n do
begin
for d := 1 to k do
s := s + chr(random(10)+48);
writeln(s);
s:='';
end;
end;
if a=3 then
begin
for i:=1 to n do
begin
for d := 1 to k do
s := s + chr(random(26)+97)+chr(random(10)+48);
delete(s,k,k);
writeln(s);
s:='';
end;
end;
end;
end.
4,6(52 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ