В 1 килобайте(Кб )1024 байт(б)
в 1 байте 1/1024 килобайт
в 30 байт 30/1024 килобайт=15/512 Кб
В диапазоне -32 до +32 находится 65 значений, для кодирования 1 значения потребуется 7 бит (2⁶ = 64 этого не хватит, а 2⁷ = 128)
40960*7 = 286720 бит = 35840 байт = 35 Кб
ответ: 35 Кб
1. Программа, создающая тестовый файл.
// PascalABC.NET 3.1, сборка 1213 от 04.04.2016
begin
var f: file of integer;
var t:integer;
Assign(f,'input.dat'); Rewrite(f);
for var j:=1 to 5 do begin
for var i:=1 to 10 do begin t:=Random(10,99); Write(f,t) end;
for var i:=1 to 10 do begin t:=-Random(10,99); Write(f,t) end
end;
f.Close;
end.
2. Программа, которую требовалось написать
// PascalABC.NET 3.1, сборка 1213 от 04.04.2016
begin
var f,g: file of integer;
var a:=new integer[20];
var t:integer;
Assign(f,'input.dat'); Reset(f);
Assign(g,'output.dat'); Rewrite(g);
while not f.Eof do begin
for var i:=0 to 19 do Read(f,a[i]);
a:=a[10:15]+a[0:5]+a[15:20]+a[5:10];
for var i:=0 to 19 do Write(g,a[i])
end;
f.Close;
g.Seek(0);
while not g.Eof do begin Read(g,t); Print(t) end;
g.Close
end.
тому що ми живемо в 21 столітті.Це ера нових відкриттів можливостей, але й вимог.Саме через те, що комп'ютери та техніка зараз займають дуже велике значення для людей та цивілізації, то не виключення, що через якихось декілька десятків років техніка буде невід'ємною вимогою для праці будь із чим
Перевод между системами счисления:
Чтобы перевести десятичные числа в любую систему счисления нужно разделить столбиком заданное число на основание новой системы счисления и собрать остатки от деления начиная с конца
а) 247_10 = 11110111_2
б) 247_10 = F7_16
в) 247_10 = 367_8
г) 557_10 = 1000101101_2
д) 557_10 = 22D_16
е) 557_10 = 1055_8