Объем книги = 2048*256*128*1 байт = 2048*256*128 / 1024 Кбайт =
512*128 Кбайт = 512*128 / 1024 Мбайт = 64 Мбайт
750 Гбайт = 750*1024 Мбайт
а) Количество книг = 750*1024 / 64 = 12000
б) толщина стопки книг = 12000*0,06 м = 720 метров
Var
a:longint;
begin
read(a);
if (a mod 2 = 0) then
a:= a div 2;
writeln(a);
end.
1) 01101011
2) а)50 б)214
3.а-2, б-1, в-4, г-3
4. <
>
=
5. a)68,105 б) 0,000152 в) 241300
6. а) 0,6711011*10³ б) 0,73211*10⁻³
Var a: array [1..100] of integer;
n, i, j: integer;
fout: text;
begin
assign(fout, 'output.txt');
rewrite(fout);
n := 10; //n - длина массива
for i := 1 to n do
a[i] := random(100);
for i := 1 to n do
write(fout, a[i], ' ');
writeln(fout);
j := 1;
for i := 2 to n do
if a[i] > a[j] then
j := i;
writeln(fout, 'max = ', a[j], ' max_ind = ', j);
j := 1;
for i := 2 to n do
if a[i] < a[j] then
j := i;
writeln(fout, 'min = ', a[j], ' min_ind = ', j);
close(fout);
<span>end.</span>
Валя, Вася,Вова,вода,волк,Наташа,панамка ананас