Var a:array[1..1000] of integer;
<span>sum,n,i:integer; </span>
<span>begin </span>
<span>sum:=0; </span>
<span>writeln('Введите количество чисел'); </span>
<span>read(n); </span>
<span>writeln('Введите числа'); </span>
<span>for i:=1 to n do begin </span>
<span>read(a[i]); </span>
<span>if (a[i] mod 7=0) and (a[i] mod 10=4)then sum:=sum+a[i]; </span>
<span>end; </span>
<span>writeln('Сумма элементов кратных 7 и оканчиваюшихся на 4 = ',sum); </span>
<span>end.</span>
Ответ:
#include <iostream>
using namespace std ;
int main (){
int A[8],m=0;
for (int i = 0 ; i<8;i++){
cin << A[i];
if (A[i]>0){
m+=1;
}
}
cout << endl <<m ;
return 0 ;
}
Var a,b,c:integer;
begin
readln(a, b);
c:=a+b;
writeln(c);
end.
Переводим сначала в десятичную:
затем в двоичную:
35701 =17850*2+1
17850 =8925*2+0
8925 =4462*2+1
4462=2231*2+0
2231=1115*2+1
1115=557*2+1
557=278*2+1
278=139*2+0
139=69*2+1
69=34*2+1
34=17*2+0
17=8*2+1
8=4*2+0
4=2*2+0
2=1*2+0
Ответ: 1000101101110101
64это 2 в 6 степени. получается 1 символ = 6 бит. 10*32*64=20480 символов 20480*6=122880бит=15360байт=15кбайт