Информатика 5 класс.урок 34. контрольная работа.2.заполните пропуск:" если...является основным объектом в изучении предмета информатики,то компьютеры считаются главным...в изучении данного предмета" а) информация,инструментов;б) наука,средство; в) интернет; оружие;г) программа,компьютер.
m=10;
n=6;
var
a:array[1..m,1..n] of integer;
i,j,maxr:integer;
p,maxp:longint;
begin
Randomize;
Writeln('Исходный массив');
maxp:=0;
for i:=1 to m do
begin
p:=1;
for j:=1 to n do
begin
a[i,j]:=Random(99)+1; { интервал [1..99] }
Write(a[i,j]:3);
p:=p*a[i,j]
end;
if maxp<p then begin maxp:=p; maxr:=i end;
Writeln
end;
for i:=1 to m do
for j:=1 to n do a[i,j]:=a[maxr,j];
Writeln('Сформированный массив');
for i:=1 to m do
begin
for j:=1 to n do Write(a[i,j]:3);
Writeln
end
end.
Тестовое решение:
Исходный массив
86 61 76 1 86 64
93 87 34 66 35 13
51 39 57 5 71 49
86 47 26 30 93 80
58 24 59 57 3 79
46 81 17 24 11 37
12 83 56 75 89 16
50 93 57 1 51 64
25 35 69 29 46 73
68 56 68 95 42 62
Сформированный массив
86 47 26 30 93 80
86 47 26 30 93 80
86 47 26 30 93 80
86 47 26 30 93 80
86 47 26 30 93 80
86 47 26 30 93 80
86 47 26 30 93 80
86 47 26 30 93 80
86 47 26 30 93 80
86 47 26 30 93 80
37 : 2 = 18 (остаток 1)
18 : 2 = 9 (остаток 0)
9 : 2 = 4 (остаток 1)
4 : 2 = 2 (остаток 0)
2 : 2 = 1 (остаток 0)
1 : 2 = 0 (остаток 1)
В ответе записываем остатки с конца подсчетов
ответ : 1001010
74(10) = 1001010(2)
23 : 2 = 11 (остаток 1)
11 : 2 = 5 (остаток 1)
5 : 2 = 2 (остаток 1)
2 : 2 = 1 (остаток 0)
1 : 2 = 0 (остаток 1)
ответ : 10111
23(10) = 10111(2)
17 : 2 = 8 (остатк 1)
8 : 2 = 4 (остаток 0)
4 : 2 = 2 (остаток 0)
2 : 2 = 1 (остаток 0)
1 : 2 = 0 (остаток 1)
ответ: 10001
17(10) = 10001(2)
2 : 2 = 1 (остаток 0)
1 : 2 = 0 (остаток 1)
ответ: 10
2(10) = 10(2)