Program n1;
const n=10;
var a: array [1..n] of integer;
i: integer;
begin
randomize;
writeln('исходный массив: ');
for i:=1 to n do
begin
a[i]:=random(15)+1;
write(a[i],' ');
end;
writeln;
writeln('полученный массив: ');
for i:=1 to n do
begin
a[i]:=a[i]*5;
write(a[i],' ');
end;
end.
Var i,n,k:integer;
a:array[1..12] of integer;
begin
write('Write k: '); readln(k);
for i:=1 to 12 do
begin
a[i]:=Random(70)-10;
write(a[i]:5);
end;
writeln;
for i:=1 to 12 do
If a[i] mod k=0
then write(k:3,a[i])
else write(a[i]:5);
readln
end.
1) именительного падежа,единственного числа.
2)<span>следовательно, число не оканчивается на 0</span>
Дано:
K=1024*512=524288
V=1,5 Мб * 1024=1536 Кб * 1024=1572864 байт * 8=12582912 бит
Найти:
N-?
Решение:
V=K*I
I=log₂N
N=2^i
I=V/K
I=12582912/524288=24 бит
N=2^24=16777216
Ответ: 16777216
//Мое условие отличается от данного Вами, потому что в Вашем была допущена ошибка, но я разобрался.