Var n,k,m: integer;
begin
write('число: '); readln(n);
m:=1;
k:=trunc(log2(n));
if (k mod 2)=1 then m:=m shl (k-1)
else m:=m shl k;
repeat
write(m,' ');
m:=m shr 2;
until m<2;
<span>end.
</span>
<span>Программа считает сумму последних трех цифр:
<em><u>Pascal:</u></em>
var n:longint;
sum,i:integer;
begin
repeat
write ('N = ');
readln (n):
until (n>=10000) and (n<=99999);
sum:=0;
for i:=1 to 3 do
begin
sum:=sum+(n mod 10);
n:=n div 10;
end;
writeln ('Summa: ',sum);
end.
<u><em>C++:</em></u>
#include <iostream></span>
<span>using namespace std;</span><span>
int main()</span><span>
{
</span><span>
int n,sum = 0;</span><span>
do</span><span>
{
</span><span>
cout <<"N = ";</span><span>
cin >>n;
}
</span><span>
while (n<10000 || n>99999);</span><span>
for (int I = 1; I<=3; I++)</span><span>
{
sum+=n%10;
n/=10;
}
</span><span> cout <<"Summa: " <<sum <<endl;</span><span>
return 0;</span><span>
}</span>
Ответ:
635мб = 665845760 байт либо 6,35e+8
738гб = 773849088 кбайт
1024бит = 0.125кб
7.5гб = 7500мб
Объяснение:
1мб = 1000000 байт
1 гб = 1000000 кбайт
1кб = 8000бит
1гб = 1000мб
а дальше умножение
//0) Мы хотим найти сумму цифр четырёхзначного числа x.
//1) Сохраним первую цифру числа x:
int a = x / 1000;
//2) Сохраним вторую цифру числа x:
int b = (x / 100) % 10;
//3) Сохраним третью цифру числа x:
int c = (x / 10) % 10;
//4) Сохраним четвёртую цифру числа x:
int d = x % 10;
// Ответ: a+b+c+d
int ans = a + b + c + d;