Программа находится во вложении, надеюсь поможет.
Program z1;
Var c,i:integer;
Begin
Read (n,i);
If not(c=2) then
For i to 0 do
begin
c:=c+1;
i:=i-2;
end;
writeln(n);
end.
Var a0, a1, a2, a3, a: longint;
Begin
readln(a3, a2, a1, a0);
a:=a3*1000+a2*100+a1*10+a0;
write(a)
End.
Пример:
1 5 9 8
1598
уже было такое.. иногда пользуйтесь поиском чтоль.
1) полностью наполнить 5 литровый бидон
2)из 5 литровой в 3х литровую переливаем масло( в 5 литровой остаётся 2)
3)3х литровую в общую ёмкость
4) из 5 литровой в 3х литровую переливаем оставшиеся 2 литра из 5 литровой
5) доверху наполняем 5 литровую
6) из 5 литровой доверху наполняем 3х литровую
7) из трёхлитровой переливаем всё в бидон, в 5ти литровой осталось 4
пишем бидоны(их кол-во), затем проделываем вот что:
8 5 3
8 0 0
3 5 0
3 2 3
6 2 0
6 0 2
1 5 2
1 4 3
4 4 0
ну то есть разливали масло по каждому бидону, пока не получится результат
или так
1. из 8 в 3 (там останется 5)
2. из 3 в 5
3. из 8 в 3 (там останется 2)
4. из 3 в 5 долить 2 (остается 1)
5. из 5 в 8 (там стало 7)
6. из 3 в 5
7. из 8 в 3 (там стало 4)
8. из 3 в 5 (там тоже стало 4)
В текстовом процессоре Word принято использовать два метода создания нового документа: на основе готового шаблона или на основе существующего документа. Второй метод проще, но первый методически более корректен.<span>При создании документа на основе существующего документа открывают готовый документ (Файл > Открыть), сохраняют его под новым именем (Файл > Сохранить как), затем выделяют в нем все содержимое (Правка > Выделить все) и удаляют его нажатием клавиши DELETE, после чего получают пустой документ, имеющий собственное имя и сохраняющий все настройки, ранее принятые для исходного документа.</span><span>Как видите, этот метод действительно прост, но чреват весьма неприятными ошибками. Например, если забыть-сохранить новый файл под другим именем, можно легко уничтожить ценный документ, даже не успев создать новый. Для рабочих мест, на которых создаются десятки документов в сутки, этот метод потенциально опасен.Создание документа на основе готового шаблона выполняется следующим образом.</span><span><span>Командой </span>Файл > Создать<span> открывают диалоговое окно </span>Создание файла<span>, включают переключатель Создать документ и выбирают шаблон. Если никаких предпочтений нет, следует выбрать шаблон </span>Обычный<span> на вкладке </span>Общие<span>. Созданный документ приобретает имя </span>Документ1<span>, принятое по умолчанию. Его целесообразно сразу же сохранить под “правильным” именем, выбрав для него соответствующую папку и дав команду </span>Файл > Сохранить<span> как.</span></span>