Подсчитайте количество трехзначных чисел, кратных 13.

1способ  var i,k: integer; begin k: =0;   for i: =999 downto 100 do  begin    if i mod 13= 0 then k: =k+1;     end;     write(k);   end.2 способvar i,k: integer; begin  k: =0;     for i: =100 to 999 do    begin      if i mod 13= 0 then  k: =k+1;     end;       write(k);   end.

// pascalabc.net 3.2, сборка 1387 от 20.02.2017 // внимание! если программа не работает, обновите версию! begin   writeln(range(100,999).where(x-> x mod 13=0).count) end. результат 69

1. информация — сведения о чём-либо, независимо от формы их представления.2.информатика наука  о методах и процессах сбора, хранения, обработки, анализа и оценки  информации , обеспечивающих возможность её использования для принятия решений.3. внутренние свойства  — это свойства, органически присущие объекту. они обычно «скрыты» от изучающего объект и проявляют себя косвенным образом при взаимодействии данного объекта с другими. внешние свойства  — это свойства, характеризующие поведение объекта при взаимодействии с другими объектами.4.логическая информация, адекватно отображающая объективные закономерности природы, общества и мышления, по­лучила название  научнойинформации. ее делят по областям полу­чения или использования на следующие виды: политическая,техническая,биологическая,,  и т.д.; по  назначению - на массовую и специальную.6. бит, байт, килобит, мегабайт, гагабайт.7.    система счисления , в которой значение каждого  числового знака   (цифры ) в  записи   числа зависит от его позиции (разряда).