Было - 6,8, при перемещении стало - 6. Ответ: 3 (0,8)
Program privet1;
var
k : integer;
begin
write('Введите номер курса: ');
readln(k);
if k = 1 then
writeln('Привет, первокурсник')
else if k = 2 then
writeln('Привет, второкурсник')
else if k = 3 then
writeln('Привет, третьекурсник')
else if k = 4 then
writeln('Привет, четверокурсник')
else if k = 5 then
writeln('Привет, пятикурсник');
end.
Function Sum(m: myarray): Integer
Var i, s : integer
sum:=0
For i:=1 To n do
(к уже найденной сумме первых (i-1) элементов прибавляем i-ый элемент)
s:=s+m[i];
sum:=s;
End;
Это все что я помню...
Ответ:
5 бит
Объяснение:
N=2^i, где N-мощность алфавита(кол-во символов), i -вес 1 символа=> 32=2^5