Ответ:
Ответ: 2+3+1=6
6>1 ( 6 больше 1 )
Объяснение: d1 = 1+1; d2 = 2+1; dn = 1;
720 бит, это 90 байт;
N =90/180=0,5 байта или 4 бита;
Ответ: 4 бита.
//Pascal ABC.NET v3.1 сборка 1172
Const
n=5;
Var
ar1,ar2:array[1..n] of integer;
i,k,m:integer;
begin
writeln('Reading array A:');
for i:=1 to n do
readln(ar1[i]);
writeln('Reading array B:');
for i:=1 to n do
readln(ar2[i]);
writeln('Res:');
for i:=1 to n do
if ar1[i]>5 then
begin
writeln(i);
break;
end;
for i:=1 to n do
if odd(ar2[i]) then
begin
writeln(ar2[i]);
break;
end;
end.
Пример ввода:
Array A:
1
2
4
5
9
Array B:
1
4
7
9
13
Пример вывода:
Res:
5
1
Проще всего в windows зажать alt и набрать на доп клавиатуре нужное число:
Alt+77 = M
Alt+109 = m
Alt+79 = O
Alt+111 = o
Alt+42 = *
Alt+56 = 8
Alt+91 = [
Alt+123 = {