Ответ:
2)
Объяснение:
x=-3
y=10
z=-2
y=2*x+y = -3*2 + 10 = 4
z=y*2-z/2 = 4*2 - (-2)/2 = 9
x=y+z = 9 + 4 = 13
x = 13, y = 4, z = 9, ответ 2)
Def.doc
1e.dat
defgh.ddd
ae123.def
В) 100110111 - двоичная ; 311 - десятичная
Г) 110000101000 - двоичная ; 3112 - десятичная ; 6050 - восьмиричная
3) DCXXXVII
var a:array[1..10,1..15]of integer;
i,j,n,x:integer;
begin
for i:=1 to 10 do for j:=1 to 15 do a[i,j]:=random(101);
for i:=1 to 10 do begin for j:=1 to 15 do write(a[i,j],' '); if j=15 then writeln; end;
readln(x);
for i:=1 to 10 do for j:=1 to 15 do
if a[i,j]=x then inc(n);
writeln(n);
end.
var a:array[1..10,1..15]of integer;
i,j,k:integer;
begin
for i:=1 to 10 do for j:=1 to 15 do a[i,j]:=random(101);
for i:=1 to 10 do begin for j:=1 to 15 do write(a[i,j],' '); if j=15 then writeln; end;
for i:=1 to 10 do for j:=1 to 15 do
if a[i,j] mod 2=0 then inc(k);
writeln(k);
end.
program mas;
var A:array[1..4,1..6] of integer;
i, j: integer;
summ: integer;
id: integer;
begin
randomize;
for i := 1 to 4 do
begin
for j := 1 to 6 do
begin
A[i, j] := random(30) + 45;
write(A[i,j]);
write(' ');
end;
writeln('');
end;
for j := 1 to 6 do
begin
for i := 1 to 4 do
begin
summ := summ +A[i, j];
end;
writeln(summ / 4);
summ := 0;
end;
readln;
end.