39
Язык - Ruby
def numbers_sum(n)
n = n.to_s.chars
sum = 0
n.each do |c|
sum += c.to_i()
end
return sum
end
k=0
for i in 1..1000
if numbers_sum(i.to_s(10)) == numbers_sum(i.to_s(3))
k+=1
end
end
p k
1.
Const
N = 30;
Var
A:array[1..N] of integer;
i,Max,kMax:integer;
Begin
Randomize;
Write('Исходный массив:');
For i:= 1 to N do
Begin
A[i]:=random(N);
Write(' ',A[i]);
End;
WriteLn;
{Нахождение максимума}
Max:=A[1];
For i:= 2 to N do
if A[i]>Max then Max:=A[i];
WriteLn('Max = ',Max);
{Подсчёт максимумов}
kMax:=0;
For i:= 1 to N do
if A[i] = Max then kMax:=kMax+1;
WriteLn('kMax = ',kMax);
End.
Пример:
Исходный массив: 11 13 9 8 19 9 22 29 0 23 6 26 14 21 24 24 26 26 23 13 12 20 1 21 0 27 25 28 13 0
Max = 29
kMax = 1
2.
Const
N = 30;
Var
A:Array[1..N] of integer;
i,SMax,iSMax:integer;
Begin
Randomize;
Write('Исходный массив:');
For i:= 1 to N do
Begin
A[i]:=random(N);
Write(' ',A[i])
End;
WriteLn;
iSMax:=1;
SMax:=A[1]+A[2]+A[3];
For i:= 3 to N-2 do
if A[i]+A[i+1]+A[i+2]>SMax then
Begin
iSMax:=i;
SMax:=A[i]+A[i+1]+A[i+2];
End;
WriteLn('Номера элементов, сумма которых максимальна: ',iSMax,', ',iSMax+1,', ',iSMax+2);
WriteLn('Максимальная сумма = A[',iSMax,'] + A[',iSMax+1,'] + A[',iSMax+2,'] = ',SMax)
End.
Пример:
Исходный массив: 15 13 25 8 4 4 8 20 26 25 25 7 27 16 28 18 26 24 17 20 7 15 10 12 18 13 22 19 4 25
Номера элементов, сумма которых максимальна: 9, 10, 11
Максимальная сумма = A[9] + A[10] + A[11] = 76
Ответ:
Объяснение:
1.
93₁₀=1011101₂
93:2=46 (1 остаток)
46:2=23 (0 остаток)
23:2=11 (1 остаток)
11:2=5 (1 остаток)
5:2=2 (1 остаток)
2:2=1 (0 остаток)
1
2)
109₁₀=155₈
109:8=13 (5 остаток)
13:8=1 (5 остаток)
1
3)
179₁₀=B3₁₆
179:16=11 (3 остаток)
11:16=0 (11 остаток)
4)
33₁₀=45₇
33:7=4 (5 остаток)
4:7=0 (4 остаток)
5)
113₈=75₁₀
1*8^2+1*8^1+3*8^0=75
6)
11001011₂=203₁₀
1*2^7+1*2^6+0*2^5+0*2^4+1*2^3+0*2^2+1*2^1+1*2^0=128+64+8+2+1=203
7)
1AE₁₆=430₁₀
1*16^2+10*16^1+14*16^0=256+160+14=430
8.
124₅=
1*5^2+2*5^1+4*5^0=25+10+4=39₁₀
<u>данные</u> - это информация, обрабатываемая и хранящаяся на компьютере