Какой метод сортировки реализует этот фрагмент программы? for i:= 2 to N do begin x:= a[i] for j:= i-1 downto 1 do if a[j]>x then a[j+1]:= a[j] else break a[j+1]:= x; end;

Правильный ответ:

• # Сколько листьев содержится в полном бинарном дереве высоты 2?
• # Какие имена переменных являются наиболее предпочтительными с точки зрения надежного программирования?
• # Тип данных boolean является
• # Чтобы иметь возможность записывать информацию в текстовый файл, его нужно открыть при помощи команд
• # Какое значение будет храниться в поле a записи r1 после выполнения следующего блока? var a: longint; r1: record a: word; ... end; r2: record a: integer; ... end; begin a:= 0; with r1 do begin a:= 1000; with r2 do begin a:= 1000; r1.a:= -a; end; r2.a:= -100; end; a:= 100; end.