Выполняем на компьютере
1. Запустите текстовый редактор Word.
2. Скачайте из Интернета и сохраните информацию об из-
вестных поэтах и писателях.
3. Наберите найденную информацию на трех страницах.
4. Во вкладке Ссылки выберите группу элементов Оглавление
и создайте с его оглавление к своему документу.
5. Выберите вкладку Ссылки, создайте ссылку Список ли-
тературы.
6. Наберите список использованной литературы.
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.
Цикл с предусловием — цикл, который выполняется пока истинно некоторое условие, указанное перед его началом. Это условие проверяется до выполнения тела цикла, поэтому тело может быть не выполнено ни разу (если условие с самого начала ложно)
Цикл называется итерационным, если число его повторений не задается, а определяется в ходе выполнения цикла. В этом случае одно повторение цикла называется итерацией.
Цикл, в котором условие записано после тела цикла, выполнится как минимум 1 раз, а потом начнет проверять условие цикла. Цикл с предусловием может не выполниться ни разу, так как условие проверяется сразу. Цикл с предусловием используется когда у нас есть четкие границы выполнения.
Объяснение: