(кумир)
Использовать Робот
алг поле
нач
вниз
закрасить
вниз
закрасить
вниз
вправо
закрасить
вправо
закрасить
вправо
вверх
закрасить
вверх
закрасить
вверх
влево
закрасить
влево
закрасить
влево
кон
Const n = 15;
var a: array[1..n] of integer;
i, j, m: integer;
begin
// генерация и вывод
randomize;
for i := 1 to n do a[i] := Random(19)-8;
for i := 1 to n do write(a[i], ' ');
writeln;
// Сортировка
for i := 1 to n-1 do begin
m := i;
for j := i+1 to n do
if a[j] < a[m] then m := j;
if m <> i then begin
j := a[m];
a[m] := a[i];
a[i] := j;
end;
end;
for i := 1 to n do write(a[i], ' ');
writeln;
// поиск наибольшей разности
m := a[2] - a[1];
for i := 3 to n do
if a[i] - a[i-1] > m then
m := a[i] - a[i-1];
writeln ('разность = ', m);
<span>end.</span>
Ответ:
b)
Объяснение:
присутствующие в заголовке процедуры и определяющие тип и место подстановки фактических параметров
Отгадка Комар
А часть коробля:корма
1280 или тупо переводим в 2сс или просто представляем в виде сумм чисел 2 в опред. степени( столько будет 0 + одна1)
=1024+128+64+32+8+4
всего 5 единиц
689=519+128+32+8+2 тоже 5 единиц
10110111=128+32+16+7=
245 в 2сс =1110101