Var a,max,sum:integer; arr:array [0..2015] of integer; begin randomize; max:=-500; sum:=0; for a:=0 to 2015 do begin arr[a]:=random(1001)-500; if max<arr[a] then max:=arr[a]; end; write('максимальный элемент массива ==> ',max); writeln();
if max mod 2 = 1 then begin for a:=0 to 2015 do begin if arr[a] mod 2 =1 then sum:=sum+arr[a]; end; writeln('сумма чисел одинаковой чётности числу ',max,' = ',sum); end;
sum:=0; if max mod 2 = 0 then begin for a:=0 to 2015 do begin if arr[a] mod 2 =0 then sum:=sum+arr[a]; end; writeln('сумма чисел одинаковой чётности числу ',max,' = ',sum); end;
arr:array [0..2015] of integer;
begin
randomize;
max:=-500;
sum:=0;
for a:=0 to 2015 do begin
arr[a]:=random(1001)-500;
if max<arr[a] then max:=arr[a];
end;
write('максимальный элемент массива ==> ',max);
writeln();
if max mod 2 = 1 then begin
for a:=0 to 2015 do begin
if arr[a] mod 2 =1 then sum:=sum+arr[a];
end;
writeln('сумма чисел одинаковой чётности числу ',max,' = ',sum);
end;
sum:=0;
if max mod 2 = 0 then begin
for a:=0 to 2015 do begin
if arr[a] mod 2 =0 then sum:=sum+arr[a];
end;
writeln('сумма чисел одинаковой чётности числу ',max,' = ',sum);
end;
end.
1Найдите значение выражения 8F – 80 в шестнадцатеричной системе счисления. В ответе запишите вычисленное значение в десятичной системе счисления.
Решение.
Переведём число 8F16 из шестнадцатеричной в десятичную систему счисления:
8F16 = 14310.
Переведём число 8016 из шестнадцатеричной в десятичную систему счисления:
8016 = 12810.
Найдём разность: 143 − 128 = 15.
2
Найдите значение выражения 1116 + 118 : 112. ответ запишите в двоичной системе счисления.
Решение.
Переведем все числа в десятичную систему счисления, выполним действия и переведем результат в двоичную систему счисления:
1116 = 16 + 1 = 1710,
118 = 8 + 1 = 910,
112 = 2 + 1 = 310,
17 + 9 : 3 = 17 + 3 = 2010,
20 = 16 + 4 = 10100 и маленькая два вместе с ответом
3
Вычислите значение выражения B916 − 2718. В ответе запишите вычисленное значение в десятичной системе счисления.
Решение.
Переведём числа в десятичную систему счисления:
B916 = 18510
2718 = 18510
Найдём разность: 185 − 185 = 0.
ответ дай лучшего ответа