с СОРом
1,3,5 задание​

надо налить половину пятилитрового бидона= 2,5 л и еще налить половину трехлитрового бидона = 1,5 л. (2,5+1,5=4л). в большом восьмилитровом бидоне останется  как раз 4 литра.  а 1,5 литра из трехлитрового бидона перелить в пятилитровый и в нем тоже будет 4 л.

uses crt; var

  a,b,c,min: integer; begin  writeln('введи три числа: ');   readln(a,b,c);   min: =a;   if b< min then min: =b;   if c< min then min: =c;   writeln('наименьшее из этих чисел:   ',min); end.

14                                                                                                                       

  я тут немного отсебятины добавил, что бы программа не слетала если что-то нерпавильное вводиш))

vara: string; b: integer; beginwriteln ('введите строку'); read (a); if (a='город минск')then writeln ('город минск')elsebeginwriteln ('введите "город минск", 1-продолжить, 0-выйти'); read (b); end; while (b = 1) dobeginwriteln ('введіте строку'); read (a); if (a='город минск')then writeln ('город минск')elsebeginwriteln ('введите "город минск", 1-продолжить, 0-выйти'); read (b); end; end;

end.