const n = 10;
var
mas: array [1..n] of integer;
i,j,h: integer;
begin
randomize;
for i : = 1 to n do
begin
mas[i] : = random(3);
write(' ',mas[i],' ');
end;
writeln();
for i : = 1 to n - 1 do
for j : = 1 to n - i do
if(mas[j] = 0) then
begin
h : = mas[j];
mas[j] : = mas[j + 1];
mas[j + 1] : = h;
end;
for i : = 1 to n do
write(' ',mas[i],' ');
end.
Поделитесь своими знаниями, ответьте на вопрос:
7 бит:
ascii7 — первая кодировка, пригодная для работы с текстом. помимо маленьких букв алфавита и служебных символов, содержит большие буквы языка, цифры, знаки препинания и другие символы.
кодировки стандарта ascii (8 бит):
ascii — первая кодировка, в которой стало возможно использовать символы национальных алфавитов.
кои8-r — первая кодировка. символы кириллицы расположены не в алфавитном порядке. их разместили в верхнюю половину таблицы так, чтобы позиции кириллических символов соответствовали их фонетическим аналогам в алфавите. это значит, что даже при потере старшего бита каждого символа, например, при проходе через устаревший семибитный модем, текст остается "читаемым".
cp866 — кодировка, использовавшаяся на компьютерах ibm в системе dos.
windows-1251 — кодировка, использовавшаяся в версиях операционной системы windows в начале 90-х годов. кириллические символы идут в алфавитном порядке. содержит все символы, встречающиеся в типографике обычного текста (кроме знака ударения).