<span>Набрать кувшин 8 л. Из него отлить в кувшин 3 л. Затем вылить эти 3 л. Затем опять отлить из 8литрового в кувшин 3 л. Оставшаяся вода в 8литровом кувшине =2 л. Переливаешь в 3литровый. Потом набираешь полный 8литровый. Из него доливаешь воды в 3литровый, т.е. 1 л. Остается 7 л.</span>
Var
i: real; //Натуральное число
begin
readln(i); //Считал число
while (i > 5) do //В условном цикле...
i := i / pi; //...преобразовал число
writeln(i); //Вывел число
end.
<span>mas = []
while True<span>:
</span>----x = int(input("X= "))
</span>----<span>mas.append(x)
</span>----<span>if x == 0<span>:
</span></span>--------<span>break
</span><span>a = max(mas)
print("Max",a)
mas.remove(a)
b = max(mas)
print("Max",b)
print("произведение: ",a*b)</span>
Если в Паскале то вот должно работать !
BAR i,s:integer;
BEGIN
s:=0;
for i:=1 to 100 do
if i mod 2 = 0 then s:=s+i;
writeln(s);
<span>END.</span>