1. какие пары объектов находятся в отношении "объект - модель"? а) компьютер – данные; б) компьютер - его функциональная схема; в) компьютер – программа; г) компьютер – алгоритм. 2. какая модель компьютера является формальной (полученной в результате формализации)? а) техническое описание компьютера; б) фотография компьютера; в) логическая схема компьютера; г) рисунок компьютера. 3. информационной моделью, которая имеет табличную структуру является а) файловая система компьютера; б) таблица менделеева; в) генеалогическое дерево семьи; г) функциональная схема компьютера. 4. какая модель является динамической (описывающей изменение состояния объекта)? а) формула соединения; б) формула закона ома; в) формула реакции; г) закон всемирного тяготения.
Ответы
1. б) 2. в) 3. а,б) 4. в.)
Var n,m,i,j,k,s,s1: longint; y: array[1..10000,1..10000] of longint; o: array[1..10000] of longint; begin read(n,m); for i: =1 to n do for j: =1 to m do read(y[i,j]); for i: =1 to n do for j: =1 to n do if j< > i then begin for k: =1 to m do if y[i,k]=y[j,k] then inc(s); if s=m then begin if o[i]=0 then begin writeln(i); o[i]: =1; end; if o[j]=0 then begin writeln(j); o[j]: =1; end; inc(s1); end; s: =0; end; writeln(s1); end.
Var n,m,i,j,k,s,s1: longint; y: array[1..10000,1..10000] of longint; o: array[1..10000] of longint; begin read(n,m); for i: =1 to n do for j: =1 to m do read(y[i,j]); for i: =1 to n do for j: =1 to n do if j< > i then begin for k: =1 to m do if y[i,k]=y[j,k] then inc(s); if s=m then begin if o[i]=0 then begin writeln(i); o[i]: =1; end; if o[j]=0 then begin writeln(j); o[j]: =1; end; end; s: =0; end; end.для общего случая.
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
