В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
kristina25l
kristina25l
09.03.2021 23:31 •  Информатика

Как объявляются массивы в школьном алгоритмическом языке и в Паскале​

Показать ответ
Ответ:
Алина11117784884848
Алина11117784884848
03.03.2021 02:28

1.Файл — именованная область данных на носителе информации.

Работа с файлами реализуется средствами операционных систем. Многие операционные системы приравнивают к файлам и обрабатывают сходным образом и другие ресурсы.

2.В ОС Windows в имени файла запрещено использование следующих символов: \, /, :, *, ?, ", <, >, |. В Linux эти символы, кроме /, допустимы, хотя использовать их следует с осторожностью, так как некоторые из них могут иметь специальный смысл, а также из соображений совместимости с другими ОС.

3.Txt - блокнот, notepad, TeX

doc - word, openoffice

bmp - photoshop, picaso

rtf - word, openoffice

arj - winrar

4.Флешка

Лазерный диск

Жесткий диск

Любое устройство, подключаемое через USB, с наличием флеш-памяти

5.Каталог — каталог, директория, справочник, папка — объект в файловой системе, упрощающий организацию файлов. Ранее часто использовалось слово директория, которое представляет собой транслитерацию с английского (англ. directory). Типичная файловая система содержит большое количество файлов, и каталоги упорядочить её путём их группировки. Каталог может быть реализован как специальный файл, где регистрируется информация о других файлах и каталогах на носителе информации

6.Файлы могут быть организованы в виде линейной или иерархической файловой структуры

7.Графическое изображение иерархической файловой структуры называется деревом.

8.Путь от диска С:// до самого файла. Например, файл ДОКЛАД.png расположен в папках ШКОЛА, ИСТОРИЯ и на диске С://, тогда его полное имя будет выглядеть так:

С://ШКОЛА/ИСТОРИЯ/ДОКЛАД.png

9.Создание, Открытие, Просмотр,  Редактирование, Сохранение, Удаление

Вырезать, Копировать, Вставить, Переместить, Переименовать

10.1) линуксы - пох,

шиндошс - только читабельные символы кроме :,* и ещё вагон включая целые названия типа con, prn

2) линуксы - расширения чтобы пользователю было понятно что за файл, то есть самой системе расширение не важно. здесь не совсем уместно понятие неполного имени файла

винда - по расширению определяется тип файла, то есть чтобы запустить приложение можно напейсать имя файла приложения без расширения

11.Если он только спускался и поднимался, а начальный уровень D:\ - это понятно, тогда это:

2) D:\SCHOOL\CLASS\LESSONS. -  то есть, это его начальное место нахождения, откуда он опустился в D:\, ну и дальше поднимался в другой каталог.

12.-

13.A:\TOM3\Doc3

15.заменяет один любой символ, * - любое количество любых символов (в том числе и отсутствие символов).

1) bar.txt - нет символа перед b, не подходит

2) obar.txt - подходит

3) obar.xt - нет символа перед x, не подходит

4) barr.txt - нет символа перед b, не подходит

ответ. 2) obar.txt

16.Биология: клетка- ткань-орган-организм, география: улица-город-область-страна, история: год- век-эпоха.

Объяснение:

0,0(0 оценок)
Ответ:
Angelinamskul
Angelinamskul
23.01.2023 11:46
PascalABC.NET 3.3.5, сборка 1659 от 09.04.2018
Внимание! Если программа не работает, обновите версию!

begin
  var n:=ReadInteger('Количество строк/столбцов в таблице:');
  var a:=MatrRandom(n,n,0,1);
  a.Println(2); Writeln(2*a.ColCount*'-');
  // 1
  var k:=0;
  for var i:=0 to a.RowCount-1 do
    for var j:=0 to a.ColCount-3 do
      if (a[i,j]=0) and (a[i,j+1]=0) and (a[i,j+2]=0) then begin
        k+=1; break
        end;
  Writeln('1: ',k);
  // 2
  k:=0;
  for var j:=0 to a.ColCount-1 do
    if (a[0,j]=0) and (a[1,j]=1) then begin
      var (i,flag):=(2,True);
      while i<=a.RowCount-2 do begin
        if not ((a[i,j]=0) and (a[i+1,j]=1)) then
          begin flag:=False; break end
        else i+=2
        end;
      if flag then k+=1
      end
    else
      if (a[0,j]=1) and (a[1,j]=0) then begin
        var (i,flag):=(2,True);
        while i<=a.RowCount-2 do begin
          if not ((a[i,j]=1) and (a[i+1,j]=0)) then
            begin flag:=False; break end
          else i+=2
          end;
        if flag then k+=1
      end;
  Writeln('2: ',k);
  // 3
  var r0:=a.Rows.Where(row->row.All(t->t=0)).Count;
  var c1:=a.Cols.Where(col->col.All(t->t=1)).Count;
  Writeln('3: Нулевых строк ',r0,', единичных колонок ',c1)
end.

Пример
Количество строк/столбцов в таблице: 4
 1 1 0 1
 0 0 0 1
 1 1 1 1
 0 1 1 1

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