1). Из большого кувшина отлить в маленький 3 л. В большом осталось 5 л.
2). Перелить 3 л из маленького в средний кувшин.
3). Снова наполнить маленький кувшин из большого. В большом осталось 2 л.
4). Из маленького (в котором 3 л) наполняем доверху средний (в котором было 3 л). При этом переливаем в него 2 л, а в маленьком остается 1 л.
5). 5 л из среднего переливаем в большой (было 2 л, стало 7 л).
6). Переливаем 1 л из маленького в средний.
7). Из большого (где 7 л) наполняем маленький. В большом осталось 4 л.
8). Из маленького выливаем 3 л в средний, где был 1 л и получаем тоже 4 л.
Объяснение:
ma, mi: real;
a: array [1..100] of real;
begin
mi := 100;
for i := 1 to 100 do
begin
a[i] := random(100) / 0.5;
writeln('[', i, '] => ', a[i]);
end;
writeln('');
for i := 1 to 100 do
begin
if (a[i] > ma) then ma := a[i];
if (a[i] < mi) then mi := a[i];
end;
writeln(ma, ' - ', mi, ' = ', ma - mi);
end.
Вот =)