begin
var a := new integer[5, 5](
(2, 4, 5, 1, 3),
(7, 2, 9, 0, 2),
(6, 4, 1, 0, 1),
(8, 4, 7, 2, 0),
(6, 0, 0, 2, 1));
Println('Массив A');
a.Println(2);
Println('Массив B');
var b := new integer[5, 5](
(2, 4, 5, 0, 3),
(6, 0, 3, 2, 1),
(2, 4, 5, 1, 3),
(8, 4, 7, 2, 0),
(6, 2, 0, 2, 1));
b.Println(2);
Println('Массив A');
var c := new integer[5, 5];
var (upper, lower) := (0, a.RowCount - 1);
for var i := 0 to a.RowCount - 1 do
begin
var found := False;
for var j := 0 to b.RowCount - 1 do
if a.Row(i).SequenceEqual(b.Row(j)) then
begin
c.SetRow(upper, a.Row(i));
upper += 1;
Found := True;
break
end;
if not found then
begin
c.SetRow(lower, a.Row(i));
lower -= 1;
end
end;
a := Copy(c);
c := nil; // удаляем с
a.Println(2)
end.
![Написать программу на паскале(или хотя бы алгоритм на том же языке).в матрице а[5,5] найти все строк](/tpl/images/0952/4866/50fe2.jpg)
Объясню на примере первой задачи.
Перед нами написана программа (алгоритм) на языке псевдокода.
В начале программы объявляются переменные, с которыми мы будем работать. В данном случае, объявляются переменные s и n целочисленного типа (цел). Дальше идет присвоение переменной s значения 1. нц говорит о том, что дальше идет цикл. Каждую его итерацию (шаг) будет выполняться его тело (все, что между нц и кц). Конструкция для x от n до m говорит о том, что каждую итерацию переменная x будет увеличиваться на единицу (если указан шаг, т.е. конструкция выглядит так: для x от n до m шаг y, то будет увеличиваться на y) от числа n до числа m. Как только x будет равна m, цикл прекратится и будут выполняться действия после него. В нашем случае переменной n присваивается 3, выполняется тело s:=s*3. Т.е. после этого шага s будет равна 9. Теперь новая итерация. Переходим в начало цикла. Переменной n присваивается 4 (в предыдущий раз было 3). И опять выполняется действие s:=s*3. s становится равной 27. Потом опять новая итерация. И так далее. Когда n будет равна 5 ,то произойдет последняя итерация. Дальше пойдет вывод s, который после 4 итераций (n от 2-х до 5-ти включительно) будет равна 81.
Итерации более детально:
1. n = 2; s = 1*3 = 3
2. n = 3; s = 3*3 = 9
3. n = 4; s = 9*3 = 27
4. n = 5; s = 27*3 = 81
Все, цикл завершился.
ответы:
1) 81
2) 50
Итерации более детально:
1. n = 3; s = 0+2*3 = 6
2. n = 4; s = 6+2*4= 14
3. n = 5; s = 14+2*5 = 24
4. n = 6; s = 24+2*6 = 36
5. n = 7; s = 36+2*7 = 50
3) 13
4) 11
5) 121
6) 120
7) 38
8) 20
9) 40
Заметим, что в данной задаче указан шаг (step 2). Это значит, что каждую итерацию k будет увеличиваться не на 1-цу, а на 2-ку.
Итерации более детально:
1. k = 6; s = 0+10 = 10
2. k = 8; s = 10+10 = 20
3. k = 10; s = 20+10 = 30
4. k = 12; s = 30+10 = 40
