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

Нужно решить с for по информатики с 8 до 1 - го квадраты и кубы и написать что дано нужно много ​

👇
Открыть все ответы
Ответ:
sasha3637
sasha3637
24.09.2021

1.  Укажите программу для работы с растровыми изображениями.

B. Paint.

2. В файле какого формата хранятся растровые изображения?

А. BMP.

3. В каком формате применяется сжатие?

А. JPG.

4. Формат графического файлы – это:

представления и расположения графических данных на внешнем носителе.

5. Выберите графический формат, в котором могут храниться анимированные изображения.

А. GIF.

Точно не уверенна, но думаю так

Редактор векторной графики Inkscape.

1.  Укажите стандартный формат файлов в редакторе Inkscape.

А. Inkscape SVG.

2. Для точной настройки инструментов служит:

B. Панель параметров инструментов.

3. Просмотреть список выполненных действий можно, выполнив команду:

C. Правка→История действий.

4. Какая команда меню открывает диалог «Заливка и обводка»?

C. Объект→ Заливка и обводка.

5. Какую клавишу необходимо удержать нажатой при выборе цвета обводки из Палитры?

C. Shift.

4,5(83 оценок)
Ответ:
Danila1367
Danila1367
24.09.2021
Var
a,k,m,min,i,flag:integer;
    begin
            readln(a);
            m:=a; {сохраняю введенное значение и считаю кол-во цифр в числе}
              while m >0 do     
                  begin         
                          m:=m div 10;         
                          k:=k+1;     
                  end;     
min:=9; {записываю самое большое нечетное число}
{в цикле отсекаю последнюю цифру в числе и проверяю ее на нечетность. Если она нечетная и меньше числа min, то сохраняю ее в min и присваиваю переменной Flag 1. Если к концу программы в переменной flag  будет 1, значит хотя бы одна нечетная цифра в числе была, если flag=0 тогда в числе нет нечетных}
            for i:=1 to k do   
                      begin       
                             if   (a mod 10<=min)and(a mod 2<>0) then           
                                begin             
                                     min:=a mod 10;             
                                     flag:=1;           
                                end;       
                          a:=a div 10;   
                     end;         
      if flag=0 then           
                writeln('нет нечетных')         
      else             
                writeln(min);
end.
4,4(93 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ