5 - 9 классы Информатика 5+3 б 3. Екі скриптіні салыстырыңыз. Ұқсастығы мен айырмашылығы неде екенін жазыңыз.1-ссурет идти 10 шагов если край оттолкнутся 2-сурет идти 10 шагов повернуть в направление 90
1. Для матрицы 3* 3 обнулить все элементы с четным значением. Результат вывести на экран. uses crt; const n=3; var a: array [1..n,1..n] of integer; x,y: integer; begin for x:=1 to n do begin for y:=1 to n do begin a[x,y]:=random(21)-10; write(a[x,y]:4); if a[x,y] mod 2=0 then a[x,y]:=0; end; writeln; end; writeln; for x:=1 to n do begin for y:=1 to n do write(a[x,y]:4); writeln; end; end.
2. Для матрицы 3*3 целых чисел найти индексы элементов с нулевым значением. Результат вывести на экран. uses crt; const n=3; var a: array [1..n,1..n] of integer; x,y: integer; begin for x:=1 to n do begin for y:=1 to n do begin a[x,y]:=random(21)-10; write(a[x,y]:4); end; writeln; end; writeln; for x:=1 to n do for y:=1 to n do if a[x,y]=0 then writeln(x,',',y); end.
Индекс в нижней части числа означает систему счисления, (...) число в скобках записать внизу(и без скобок): 10111(2) т.е число в двоичной с.с необходимо перевести в 10-ную с.с 10111(2) =23(10) 275(8)=189(10) 1F3(16)=499(10) 112(10)=1110000(2) если число в 10-ной с.с то 94(10)=136(8), а если число в 16-ричной с.с , то 94 (16)= 224(8) 123(10)= 7В (16) 1110011001(2)=1631(8) Если в 8-ричной с.с, то 251(8)=10101001(2), если число в 10-ной с.с, то 251(10)=11111011(2), если число в 16-ричной с.с, то 251(16)= 1001010001(2) 1111000(2)= 78(16) 1F5(16)=111110101(2), (буквы I в 16-ричной системе счисления нет)
uses crt;
const n=3;
var a: array [1..n,1..n] of integer;
x,y: integer;
begin
for x:=1 to n do begin
for y:=1 to n do begin
a[x,y]:=random(21)-10;
write(a[x,y]:4);
if a[x,y] mod 2=0 then a[x,y]:=0;
end;
writeln;
end;
writeln;
for x:=1 to n do begin
for y:=1 to n do
write(a[x,y]:4);
writeln;
end;
end.
2. Для матрицы 3*3 целых чисел найти индексы элементов с нулевым значением. Результат вывести на экран.
uses crt;
const n=3;
var a: array [1..n,1..n] of integer;
x,y: integer;
begin
for x:=1 to n do begin
for y:=1 to n do begin
a[x,y]:=random(21)-10;
write(a[x,y]:4);
end;
writeln;
end;
writeln;
for x:=1 to n do
for y:=1 to n do
if a[x,y]=0 then writeln(x,',',y);
end.
10111(2) т.е число в двоичной с.с необходимо перевести в 10-ную с.с
10111(2) =23(10)
275(8)=189(10)
1F3(16)=499(10)
112(10)=1110000(2)
если число в 10-ной с.с то 94(10)=136(8), а если число в 16-ричной с.с , то 94 (16)= 224(8)
123(10)= 7В (16)
1110011001(2)=1631(8)
Если в 8-ричной с.с, то 251(8)=10101001(2), если число в 10-ной с.с, то 251(10)=11111011(2), если число в 16-ричной с.с, то 251(16)= 1001010001(2)
1111000(2)= 78(16)
1F5(16)=111110101(2), (буквы I в 16-ричной системе счисления нет)