Coolboy1213
11.12.2021 13:22

1. предмет «информатика», цели и

2. понятие информации единицы измерения информации

3. системы счисления для в компьютерной техники (двоичная, восьмеричная,

десятичная, шестнадцатеричная кодирования различных видов информации (число, текст, графика,

аудио и видео).

5. основные структуры данных. файлы и файловая структура.

6. общая структурная схема, состав и основные принципы работы

современного персонального компьютера.

7. системный блок, основные элементы.

8. виды памяти пк, накопители информации.

9. микропроцессор и его характеристики. сопроцессоры.

10. устройства ввода-вывода информации.

11. понятие операционной системы, ее основные функции.

12. основные объекты и приемы windows. файлы и папки. главное

меню, панель .

13. стандартные прикладные программы, служебные приложения, мультимедиа

windows.

14. понятие «алгоритм». формы представления алгоритмов. свойства

алгоритмов.

15. составление блок-схем алгоритмов. типы блоков графического

представления алгоритма.

16. циклические структуры. циклы с предусловием, с постусловием, с

параметром.

17. понятие массив. массивы одномерные и многомерные.

18. поиск наибольшего и наименьшего элемента в массиве сортировки элементов массива.

20. справочная система windows.

21. программное обеспечение пк.

22. стандартные прикладные программы, служебные приложения, мультимедиа

windows.

23. основные функциональные возможности ms word.

24. структура рабочего окна ms word.

25. разделы и команды главного меню ms word.

26. этапы создания и форматирования документов в ms word.

27. использование таблиц в документах ms word. конфигурирование ms word.

28. шаблоны документов ms word.

29. стили оформления ms word.

30. импортирование объектов, созданных другими программами.

31. построение графических объектов в ms word

32. назначение и основные функциональные возможности ms excel.

33. строение и компоненты электронной таблицы ms excel.

34. структура рабочего окна ms excel. конфигурирование ms excel.

35. разделы и команды главного меню ms excel.

36. этапы создания и форматирования электронных таблиц в ms excel.

37. использование в электронных таблицах встроенных функций ms excel.

38. графическое представление табличных данных.

39. операции фильтрации и сортировки.

40. создание итоговых и сводных таблиц ms excel.

41. база данных. основные понятия, определения.

42. современные системы базами данных (субд).

43. строение файла с базой данных (бд) в ms access.

44. этапы проектирования, создания и ведения бд.

45. объекты ms access и их назначение (таблица, форма, запрос, отчет, макрос,

модуль).

46. сети передачи данных. компьютерные сети. классификация компьютерных

сетей.

47. одноранговые сети, сети клиент-сервер.

48. топологии компьютерных сетей.

49. компьютерная сеть internet.

50. адресация в internet, доменная система имен, маршрутизация.

51. цели и защита информации.

52. основные виды и источники атак на информацию.

53. методы и средства защита от несанкционированного доступа к информации.

54. вирусы и антивирусные программы.

дать на каждый вопрос краткий ответ. 99 .

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
никанана
23.07.2020 22:34
"Типовой школьный" Паскаль:

// PascalABC.Net 3.0, сборка 1064
const
  k = 100;

var
  s, wd: string;
  i, j, m, n, pt, step: integer;
  Words, WordsSort: array[1..k] of string;
  InOrder: boolean;

begin
  Write('Введите строку: '); Readln(s);
  n := Length(s); pt := 1; m := 0;
  repeat
    // Пропускаем все символы до первого непробельного
    while pt <= n do
      if Ord(s[pt]) <= 32 then Inc(pt) else break;
    if pt <= n then begin
      // Выделяем очередное слово
      wd := '';
      while pt <= n do
        if Ord(s[pt]) > 32 then begin wd := wd + s[pt];Inc(pt) end
        else break;
      if wd <> '' then begin Inc(m);Words[m] := wd end
    end
  until pt > n;
  // Теперь Words содержит все m слов.
  // Отсортируем их в массиве WordsSort методом Шелла
  for i := 1 to m do WordsSort[i] := Words[i];
  step := m div 2;
  while step > 0 do begin
    for j := m - step downto 1 do begin
      i := j;
      while i <= m - step do begin
        if WordsSort[i] > WordsSort[i + step] then begin
          wd := WordsSort[i];
          WordsSort[i] := WordsSort[i + 1];
          WordsSort[i + 1] := wd
        end;
        i := i + step
      end
    end;
    step := step div 2
  end;
  // Осталось поэлементно сравнить оба массива
  InOrder := true; i := 1;
  while InOrder and (i <= m) do
  begin InOrder := (Words[i] = WordsSort[i]); Inc(i) end;
  if m = 0 then Writeln('Строка не содержит слов')
  else
    if InOrder then Writeln('Cлова упорядочены')
    else Writeln('Cлова не упорядочены')
end.

Тестовое решение:
Введите строку: слово1    слово2    слово3    слово4 слово5
Cлова упорядочены

Введите строку: слово1    слово2    слово4    слово3 слово5
Cлова не упорядочены

"Современный" вариант решения на Паскале:

// PascalABC.Net 3.0, сборка 1064
var
  s:string;
begin
  Write('Введите строку: '); Readln(s);
  var Delim:=Range(0,32).Select(x->Chr(x)).ToArray;
  var Words:=s.Split(Delim).Where(x->x<>'');
  var WordsSort:=Words.Sorted;
  if Words.SequenceEqual(WordsSort) then Writeln('Cлова упорядочены')
  else Writeln('Cлова не упорядочены')
end.

Тестовое решение совпадает с вышеприведенным.
0,0(0 оценок)
Ответ:
KirikRu
14.07.2021 10:54
Procedure TForm1.Button1Click(Sender: TObject);
var
  i1,i2,i3 : Integer;
  m : array [1..10] of Integer;
  kk : Integer;
begin
  Memo1.Clear;
  for i1 := 1 to 10 do
  begin
    m[i1]:= Random(10)-5;
    Memo1.Lines.Append('m['+inttostr(i1)+'] = '+inttostr(m[i1]));
  end;
  Memo1.Lines.Append('');
  kk := 0;
  for i1 := 1 to 10-2 do
  begin
    for i2 := i1+1 to 10-1 do
    begin
      for i3 := i2+1 to 10 do
      begin
        if ( (m[i1]+m[i2]+m[i3])=0) then
        begin
          inc(kk);
          Memo1.Lines.Append('Индекс = '+inttostr(i1)+'  '+inttostr(i2)+'  '+inttostr(i3)+'      Значение = '+inttostr(m[i1])+'  '+inttostr(m[i2])+'  '+inttostr(m[i3]));
        end;
      end;
    end;
  end;
  Memo1.Lines.Append('');
  if kk>0 then
    Memo1.Lines.Append('Да в этом массиве есть три числа сумма которых равна нулю')
  else
    Memo1.Lines.Append('Нет в этом массиве три числа сумма которых равна нулю');
  Memo1.Lines.Append('Количество комбинаций = '+inttostr(kk));
end;


Дан массив из n целых чисел а1, а2, an. вам нужно проверить, есть ли в этом массиве три числа сумма
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота