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

Нужно ли оцифровывать аналоговую видеозапись перед обработкой

👇
Ответ:
gaifuling4owmrcy
gaifuling4owmrcy
10.07.2022

обязательно

Объяснение:

после этого запись станет лучше показывать

4,8(49 оценок)
Открыть все ответы
Ответ:
Oremi
Oremi
10.07.2022

Қауіпсіздік техникасының ережелерін төмендегі пункттерге бөлуге болады:

1. Жалпы

2. ДК - де жұмыс істеу алдында

3. Жұмыс істеу кезінде

4. Авариялық жағдайларда

5. Жұмысты аяқтағанда

Жалпы қауіпсіздік талаптары:

1. Мұғалімнің рұқсатынсыз құрал - жабдықтарды орнынан қозғауға, сымдарға, розеткаларға, штепсельдің айырына, штекерге тиісуге тыйым салынады.

2. Мұғалімнің рұқсатынсыз сыныпқа кіруге және сыныптан шығуға болмайды.

3. Мұғалімнің рұқсатынсыз сыныпта жүруге болмайды.

4. ДК - де су киіммен және су қолмен жұмыс істеуге болмайды.

5. Корпусы мен сымдарының бүтіндігі бұзылған (ашық) ДК - де жұмыс істеуге тыйым салынады.

6. Үстелге, ДК - дің жанына сумка, портфель, кітап қоюға болмайды. Үстелде тек дәптер мен қалам ғана жатуы керек.

7. Пернетақтаның үстіне ештеңені қоюға болмайды.

8. Компьютер сыныбында жүгіруге, ойнауға, жолдастарыңның көңілін қажетсіз аударуға, бөгде жұмыстарды істеуге тыйым салынады.

4,8(47 оценок)
Ответ:
Procedure TForm1.Button1Click(Sender: TObject);
var
  i1,i2,i3 : Integer;
  kk : Integer;
  Chislo : Integer;
begin
  Memo1.Clear;
  kk := 0;
  for i1 := 1 to 9 do
    for i2 := 0 to 9 do
      for i3 := 0 to 9 do
        if ( (i1<>i2) and (i1<>i3) and (i2<>i3) ) then
          if ( Frac((i1+i2+i3)/7)=0 ) then
          begin
            Chislo := i1*100 + i2*10 + i3;
            if ( Frac(Chislo/7)=0 ) then
            begin
               Memo1.Lines.Append(inttostr(Chislo));
               inc(kk);
            end;
          end;
end;


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