Знаковая модель, как следует из её определения, это формула потому что она записана специальными Знаками.
Графической модели иерархической системы лучше всего будет отвечать иерархическая модель. Хотя имеются методы, позволяющие отразить иерархию и в табличной модели (реляционная алгебра). Натуральная модель в некоторых случаях тоже может отражать иерархию: модель автомобиля, если представить его в виде иерархического набора элементов. Математическая модель может вообще все что угодно отобразить. Но все же иерархическая модель отражает иерархию наиболее наглядно.
var b:array [1..100] of integer; a:array [1..100,1..100] of integer; i, j,n,m,k1,k2: integer; begin writeln ('Введите Кол-во строк'); readln (n); writeln ('Введите Кол-во столбцов'); readln (m); writeln ('Введите к1'); readln (k1); writeln ('Введите к2'); readln (k2); for i :=1 to n do for j :=1 to m do readln ( a [ i , j ]); writeln ('Исходный массив'); for i:=1 to n do begin for j:=1 to m do write(a[i,j]:4); writeln; end; writeln; for j :=1 to m do b[j]:=a[k1][j]; for j :=1 to m do begin a[k1][j]:=a[k2][j]; a[k2][j]:=b[j]; end; writeln ('Массив после операций'); for i:=1 to n do begin for j:=1 to m do write(a[i,j]:4); writeln; end; end.
Графической модели иерархической системы лучше всего будет отвечать иерархическая модель. Хотя имеются методы, позволяющие отразить иерархию и в табличной модели (реляционная алгебра). Натуральная модель в некоторых случаях тоже может отражать иерархию: модель автомобиля, если представить его в виде иерархического набора элементов. Математическая модель может вообще все что угодно отобразить. Но все же иерархическая модель отражает иерархию наиболее наглядно.
b:array [1..100] of integer;
a:array [1..100,1..100] of integer;
i, j,n,m,k1,k2: integer;
begin
writeln ('Введите Кол-во строк');
readln (n);
writeln ('Введите Кол-во столбцов');
readln (m);
writeln ('Введите к1');
readln (k1);
writeln ('Введите к2');
readln (k2);
for i :=1 to n do
for j :=1 to m do
readln ( a [ i , j ]);
writeln ('Исходный массив');
for i:=1 to n do
begin
for j:=1 to m do
write(a[i,j]:4);
writeln;
end;
writeln;
for j :=1 to m do
b[j]:=a[k1][j];
for j :=1 to m do begin
a[k1][j]:=a[k2][j];
a[k2][j]:=b[j];
end;
writeln ('Массив после операций');
for i:=1 to n do
begin
for j:=1 to m do
write(a[i,j]:4);
writeln;
end;
end.