Объем книги = 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:array[1..10] of integer;
i:integer;
begin
for i:=1 to 10 do
read(a[i]);
for i:=1 to 10 do
if a[i]<0 then a[i]=abs(a[i]);
for i:=1 to 10 do
write(a[i]);
end.
Var
i: integer;
begin
readln(i);
if i mod 2 = 0 then
writeln(i);
else
writeln(i-1);
end