Фух, держи) Вот, Юный Натуралист посмотрела в интернете, вроде бы правильно.
<span>Алфавит имеет 256 символов. Для точного указания каждого из них в двоичном коде нужно 8 бит (или 1 байт) , потому что 2 ^ 8 = 256. То есть диапазон двоичных чисел, соответствующих символам, будет от 00000000 до 11111111. Значит, для записи любого символа достаточно 8 бит (1 байт) информации.
Следовательно ответ : 15*32*64*1=30720 бит=3840 байт</span>
const
N = 10;
Elem = 666;
var
a: array [1..N+1] of integer;
K: integer;
begin
for var i:=1 to N do
a[i] := Random(100);
writeln('Элементы массива a: ');
for var i:=1 to N do
write(a[i],' ');
writeln;
K := Random(1,N);
for var i:=N downto K do
a[i+1] := a[i];
a[K] := 666;
writeln('После вставки элемента ',Elem,' в позицию ',K,':');
for var i:=1 to N+1 do
write(a[i],' ');
writel
var d, m:integer;
var h:real;
begin
readln(d);
m := d * 2;
h := m / 60;
m := m mod 60;
write('Количество часов = ' + Int(h) + ' количество минут = '+ m)
end.