Вот тебе 2 ведра, в одном 9 литров во втором 5 литров нужно получить 3 8 шагов всего

Первое число показывает кол-во воды в 9-литровом ведре а второе в 5-литровом.
1) 0-0
2) 9-0
3) 4-5
4) 4-0
5) 0-4
6) 9-4
7) 8-5
8) 8-0
9) 3-5
Всего 8 шагов

а) електронні послуги.

Можливості здійснення електронного урядування - пошук необхідних електронних послуг,можливість пошуку за категоріями.

б) відкритість даних.

Можливості здійснення електронного урядування - Пошукові набори даних ; просмотр,так званого "Хіду виконання" державних розпоряджень.

в) залучення громадян до управління.

Можливості здійснення електронного урядування - пошук необхідної інформації за такими групами:

"Актуально ";

"Консультації з громадськістю ";

"Анонси ";

"Сприяння розвитку громадянського суспільства ";

"Громадські ради ";

"Нормативно-правова база ";

"Партнерство «Відкритий Уряд»" ;

"Рада голів громадських рад при органах виконавчої влади ";

"Громадська експертиза органів виконавчої влади ";

"Публічні звіти органів виконавчої влади ";

"Рекомендації та іноземний досвід".

г) електронний документообіг.

Можливості здійснення електронного урядування - Пошук необхідних нормативно-правових актів.

1. Решение "по-взрослому"

// PascalABC.NET 3.2, сборка 1389 от 01.03.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var F:real->real:=x->2*x*x-6*x+8;
  var a,b:real;
  Write('a b= '); Read(a,b);
  Writeln('Min=',Range(a,b,9).Select(x->F(x)).Min)
end.

Пример
a b= -2 6
Min=3.50617283950617

2. Решение "по-школьному" ("дедушкин метод")

function F(x:real):real;
begin
  F:=2*x*x-6*x+8
end;

var
  a,b,y,h,min:real;
  i:integer;
begin
  Write('a b= '); Read(a,b);
  h:=(b-a)/9;
  min:=F(a);
  for i:= 1 to 9 do begin
    y:=F(a+i*h);
    if y<min then min:=y
    end;
  Writeln('Min=',min)
end.

Пример
a b= -2 6
Min=3.50617283950617