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 л.
Объяснение:
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 л.
Объяснение:
a, b, c, p: real;
a1, b1, c1: real;
a2, b2, c2: real;
function SideLength(a1, a2, b1, b2: real): real;
begin
SideLength := sqrt(sqr(a1 - b1) + sqr(a2 - b2));
end;
begin
writeln('1.Найти сумму трех чисел');
readln(a, b, c);
writeln(a + b + c);
writeln('2.Катеты прямоугольного треугольника известны.Найти гипотенузу.');
readln(a, b);
writeln(sqrt(a * a + b * b));
writeln('3.Найти среднеарифметическое двух чисел.');
readln(a, b);
writeln((a + b) / 2);
writeln('4.Найти длину окружности,если известна площадь круга.');
readln(a);
writeln(sqrt(a / pi) * 2 * pi);
writeln('5.Какой процент составляет число а от числа b.');
readln(a, b);
writeln(a / b * 100);
writeln('6.Найдите площадь треугольника с формулы Герона.');
readln(a, b, c);
p := (a + b + c) / 2;
writeln(sqrt((p - a) * (p - b) * (p - c) * p));
writeln('7.Найдите площадь кольца,если его толщина I см,диаметр внутри круга d см.');
readln(a, b);
c := a + b;
writeln(pi * (c * c - b * b));
writeln('8.Вычислите площадь треугольника заданного координатами вершин.');
readln(a1, a2, b1, b2, c1, c2);
writeln(((a1 - c1) * (b2 - c2) - (a2 - c2) * (b1 - c1)) / 2);
writeln('9.Вычислить длинны сторон треугольника по заданным координатам его вершин.');
a := SideLength(a1, a2, b1, b2);
b := SideLength(c1, c2, b1, b2);
c := SideLength(a1, a2, c1, c2);
writeln(a, ' ', b, ' ', c);
end.