// PascalABC.NET 3.1, сборка 1200 от 13.03.2016 begin var a:=MatrixRandom(7,7,0,9); var k:=0; for var i:=0 to 6 do begin for var j:=0 to 6 do begin Write(a[i,j]:3); if a[i,j] in [1..5] then Inc(k) end; Writeln end; Writeln('Кол-во элементов на [1,5]: ',k) end.
const n=7; var a:array[1..n,1..n] of integer; i,j,k:integer; begin Randomize; k:=0; for i:=1 to n do begin for j:=1 to n do begin a[i,j]:=Random(10); Write(a[i,j]:3); if a[i,j] in [1..5] then Inc(k) end; Writeln end; Writeln('Кол-во элементов на [1,5]: ',k) end.
Мышь – это удобное устройство, с которого можно управлять объектами в графической операционной системе. Когда мышь движется по коврику, на экране перемещается указатель мыши. После наведения указателя мыши на объект с ним можно выполнить какое-либо действие. Действия над объектами выполняются кнопками мыши.
Указатель мыши – это тоже объект Windows, обладающий свойствами. Главное из них – форма. Указатель мыши может менять форму в зависимости от того, на каком объекте он установлен. Это свойство указателя мыши называется контекстной чувствительностью. Оно упрощает работу с системой, поскольку на экране наглядно видно, что можно сделать с объектом.
К основным приемам работы с мышью относятся следующие.
Наведение указателя. Указатель мыши устанавливается на нужный объект. Если задержать его на несколько секунд, часто рядом с указателем открывается всплывающая подсказка, которая кратко описывает назначение объекта.
Щелчок. Один щелчок левой кнопкой мыши. Щелчком элемент управления приводится в действие, объект – активизируется (выделяется, готовится к обработке).
Двойной щелчок. Два последовательных быстрых щелчка. Равносильно одинарному щелчку и нажатию [Enter]. Этим приемом выполняются операции с объектами: файлы открываются, программы запускаются. Обычно с каждым объектом можно выполнить несколько операций (например, файл можно открыть для просмотра, для редактирования, скопировать, переслать и прочее). Двойным щелчком выполняется та операция, которая задана как основная.
Правый щелчок. Открывает контекстное меню объекта, содержащее команды, которые можно выполнить с объектом. Основная операция выделена полужирным шрифтом. Важнейшая особенность контекстного меню состоит в том, что в нем всегда есть пункт Свойства. Щелчок на этом пункте позволяет получить информацию о свойствах объекта и изменить их. Так выполняется большинство настроек в Windows.
Перетаскивание. Перетаскиванием выполняется перемещение объектов. Указатель мыши надо навести на объект и нажать левую кнопку. Не отпуская кнопку мыши, надо переместить ее в другое место. Объект переместится вместе с указателем.
Протягивание. Выполняется так же как и перетаскивание, но при этом объект не перемещается, а изменяется. Протягиванием, например, изменяют размеры окон. Протягиванием можно выделить фрагмент текста для последующего копирования или удаления.
Специальное перетаскивание. Выполняется при нажатой правой кнопке. В момент освобождения правой кнопки открывается небольшое меню, из которого можно выбрать действие: перемещение (эквивалентно обычному перетаскиванию), копирование объекта или создание ярлыка для объекта.
Эти приемы относятся к так называемому классическому стилю управления мышью. В ОС Windows 98 существует несколько стилей управления мышью, из которых можно выбрать наиболее удобный для себя. Например, стиль Web соответствует тому, как принято работать в Internet (активизация объекта осуществляется наведением указателя мыши, запуск программ и открытие файлов - щелчком).
begin
var a:=MatrixRandom(7,7,0,9);
var k:=0;
for var i:=0 to 6 do begin
for var j:=0 to 6 do begin
Write(a[i,j]:3);
if a[i,j] in [1..5] then Inc(k)
end;
Writeln
end;
Writeln('Кол-во элементов на [1,5]: ',k)
end.
Тестовое решение:
2 1 7 3 3 2 7
9 2 9 2 0 5 5
4 2 6 9 4 6 0
1 0 3 5 4 5 9
6 3 6 0 2 0 8
0 8 4 3 2 1 8
6 0 4 4 5 4 0
Кол-во элементов на [1,5]: 27
Вариант "совсем для школы"
const
n=7;
var
a:array[1..n,1..n] of integer;
i,j,k:integer;
begin
Randomize;
k:=0;
for i:=1 to n do begin
for j:=1 to n do begin
a[i,j]:=Random(10);
Write(a[i,j]:3);
if a[i,j] in [1..5] then Inc(k)
end;
Writeln
end;
Writeln('Кол-во элементов на [1,5]: ',k)
end.
Мышь – это удобное устройство, с которого можно управлять объектами в графической операционной системе. Когда мышь движется по коврику, на экране перемещается указатель мыши. После наведения указателя мыши на объект с ним можно выполнить какое-либо действие. Действия над объектами выполняются кнопками мыши.
Указатель мыши – это тоже объект Windows, обладающий свойствами. Главное из них – форма. Указатель мыши может менять форму в зависимости от того, на каком объекте он установлен. Это свойство указателя мыши называется контекстной чувствительностью. Оно упрощает работу с системой, поскольку на экране наглядно видно, что можно сделать с объектом.
К основным приемам работы с мышью относятся следующие.
Наведение указателя. Указатель мыши устанавливается на нужный объект. Если задержать его на несколько секунд, часто рядом с указателем открывается всплывающая подсказка, которая кратко описывает назначение объекта.
Щелчок. Один щелчок левой кнопкой мыши. Щелчком элемент управления приводится в действие, объект – активизируется (выделяется, готовится к обработке).
Двойной щелчок. Два последовательных быстрых щелчка. Равносильно одинарному щелчку и нажатию [Enter]. Этим приемом выполняются операции с объектами: файлы открываются, программы запускаются. Обычно с каждым объектом можно выполнить несколько операций (например, файл можно открыть для просмотра, для редактирования, скопировать, переслать и прочее). Двойным щелчком выполняется та операция, которая задана как основная.
Правый щелчок. Открывает контекстное меню объекта, содержащее команды, которые можно выполнить с объектом. Основная операция выделена полужирным шрифтом. Важнейшая особенность контекстного меню состоит в том, что в нем всегда есть пункт Свойства. Щелчок на этом пункте позволяет получить информацию о свойствах объекта и изменить их. Так выполняется большинство настроек в Windows.
Перетаскивание. Перетаскиванием выполняется перемещение объектов. Указатель мыши надо навести на объект и нажать левую кнопку. Не отпуская кнопку мыши, надо переместить ее в другое место. Объект переместится вместе с указателем.
Протягивание. Выполняется так же как и перетаскивание, но при этом объект не перемещается, а изменяется. Протягиванием, например, изменяют размеры окон. Протягиванием можно выделить фрагмент текста для последующего копирования или удаления.
Специальное перетаскивание. Выполняется при нажатой правой кнопке. В момент освобождения правой кнопки открывается небольшое меню, из которого можно выбрать действие: перемещение (эквивалентно обычному перетаскиванию), копирование объекта или создание ярлыка для объекта.
Эти приемы относятся к так называемому классическому стилю управления мышью. В ОС Windows 98 существует несколько стилей управления мышью, из которых можно выбрать наиболее удобный для себя. Например, стиль Web соответствует тому, как принято работать в Internet (активизация объекта осуществляется наведением указателя мыши, запуск программ и открытие файлов - щелчком).