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

1)определите значение переменной c после выполнения следующего фрагмента программы, в котором a, b и с – переменные вещественного (действительного) типа: a : = 120; b : = 100; a : = a + b / 2; if b < a / 2 then c : = b + a else c : = b + a / 2; ответ укажите целым числом. 2)определите значение переменной c после выполнения следующего фрагмента программы: a : = -2; b : = -3; a : = b + a*3; if a < b then c : = a - b else c : = b – a; 3)определите значение переменной c после выполнения следующего фрагмента программы: a : = 40; b : = 10; b : = a - 2*b; if a < 2*b then c : = a else c : = b; 4)определите значение переменной c после выполнения следующего фрагмента программы: a : = 6; b : = 15; a : = b – a*2; if a > b then c : = a + b else c : = b – a; 5)определите значение переменной c после выполнения следующего фрагмента программы: a : = 100; b : = 30; a : = a – b*3; if a > b then c : = a – b else c : = b – a;

👇
Ответ:
Zubu
Zubu
07.12.2022

1)

a = 120;

b = 100;

a = 120 + 100 / 2 = 170;

b>a, c = b + a / 2, c = 100 + 170 / 2= 185 - ответ.


2)

a = -2;

b = -3;

a = -3 + (-2) * 3 = -9;

a < b, c = a - b , с = -9 + 3 = -6 - ответ.


3)

a = 40;

b = 10;

b = 40 - 2 * 10 = 20;

a = 2 * b (2 * 20 = 40), c = b, c= 20 - ответ.


4)

a = 6;

b = 15;

a = 15 - 6 * 2 = 3;

a<b, c = b - a, c = 15 - 3= 12 - ответ.


5)

a = 100;

b = 30;

a = 100 - 30 * 3 = 10;

a < b, c = b – a, c = 30 - 10 = 20 - ответ.

4,6(18 оценок)
Открыть все ответы
Ответ:
nsmorizevs
nsmorizevs
07.12.2022
// PascalABC.NET 3.2, сборка 1325 от 19.10.2016
begin
  var a:=106.Step(6).Take(15).ToArray; a.Println
end.

Результат
106 112 118 124 130 136 142 148 154 160 166 172 178 184 190

// PascalABC.NET 3.2, сборка 1325 от 19.10.2016
begin
  var b:=ArrRandom(30,-50,50); b.Println;
  var a:=ReadInteger('Введите число А:');
  Writeln('Сумма отрицательных: ',b.Where(x->x<0).Sum);
  Writeln('Cумма положительных, не больших ',a,', равна ',
    b.Where(x->(x>0) and (x<=a)).Sum)
end.

Пример
-21 12 8 50 -47 35 45 -2 -30 -33 3 12 41 -29 8 2 -24 -44 -50 -2 -13 -32 33 -29 35 -43 20 -44 42 -3
Введите число А: 36
Сумма отрицательных: -446
Cумма положительных, не больших 36, равна 168
4,8(39 оценок)
Ответ:
aiiiiiidana
aiiiiiidana
07.12.2022

несколько кликов и конечно же при использовании любимого всеми фотошопа.  Примером послужит флаг ... и вот результат работы градиента и инструмента 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 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ