program kurs_v;
const x=20;
var n:integer;
A:array[1..x] of integer;
i,min:integer;
begin
min:=A[1];
for i:=2 to N do
begin
If A[i]<min then min:=a[i];
end;
write(min);
end.
Изображения нет, но я могу объяснить как решать такой тип задач.
Здесь применяется теория графов. Если не углубляться, то там всё предельно ясно и просто.
Нужно изобразить граф: рисуем по кругу точки (вершины графа), называем их (можно не просто точки рисовать, а кружки и в кружках букву населенного пункта писать). Потом соединяем между собой точки у которых есть связь и подписываем "вес" (расстояние между населенными пунктами) этого пути. Визуально может не соответствовать длинна, но для нас потом главное просчитать какой из возможных путей наберет наибольший "вес".
Если что-то непонятно, спросите в комментариях.
У меня это получилось сделать так:
//PascalABC.NET
var
n, k : integer;
x, s : real;
begin
write('x = ');
readln(x);
write('n = ');
readln(n);
s := 0;
for k := 1 to n do
s += ((power(x,1/3)/k - exp(-k*x)) * sin(k * x));
writeln(' res = ', 1 / (x*x + sqrt(x)) * s)
end.
Нам дано, что на борту есть кок и капитан, т.е:
1) 15 голов - 1 кок - 1 капитан = 15-2= 13 - это количество матросов и котов вместе
Дальше нам сказано, что всего ЛАП И НОГ - 41:
2) От общего количества 41 - 1 нога капитана (т.к. было сказано, что капитан ОДНОНОГИЙ) - 2 ноги кока = 41 - 3 = 38 ног матросов и лап котов.
А дальше я сделала методом подбора, и у меня получилось 6 котов, 7 матросов, ну и кок с капитаном.
Проверка:
6*4 + 7*2 +1 + 2 = 41 ног и лап
6 + 7 + 1 + 1 = 15 голов