1)использовать Чертежник
алг
нач
опустить перо
нц 5 раз
сместиться на вектор(0,2)
сместиться на вектор(2,0)
сместиться на вектор(0,-2)
сместиться на вектор(-2,0)
поднять перо
сместиться на вектор(2,1)
опустить перо
сместиться на вектор(1,1)
сместиться на вектор(1,-1)
сместиться на вектор(-1,-1)
сместиться на вектор(-1,1)
поднять перо
сместиться на вектор (2,-1)
опустить перо
кц
<span>кон
2)</span>использовать Чертежник
алг
нач
опустить перо
сместиться на вектор(0,2)
сместиться на вектор(2,0)
сместиться на вектор(0,-2)
сместиться на вектор(-2,0)
поднять перо
сместиться на вектор(2,1)
опустить перо
нц 3 раз
сместиться на вектор(2,2)
сместиться на вектор(2,-2)
сместиться на вектор(-2,-2)
сместиться на вектор(-2,2)
поднять перо
сместиться на вектор(4,-1)
опустить перо
сместиться на вектор(0,2)
сместиться на вектор(2,0)
сместиться на вектор(0,-2)
сместиться на вектор(-2,0)
поднять перо
сместиться на вектор(2,1)
опустить перо
кц
<span>кон</span>
Полужирное, обычное (прямое), курсив
Примерно так выглядит граф, перестройте его под ваши пункты а) и б)
Это не сложно
Var
a, d, c, t: integer;
begin
readln(a, d, c);
if a < d then begin t := a;a := d;d := t; end;
if a < c then begin t := a;a := c;c := t; end;
if d < c then begin t := d;d := c;c := t; end;
writeln(a, ' ', d, ' ', c);
end.
<span>Блок-схема линейного алгоритма.</span>
<span>Разветвляющийся алгоритм</span>
<span></span>