Задача 1. Бабушка жарит картофельные лепёшки, на сковороде, на которой одновременно
можно выпекать не более двух лепёшек. Каждую из лепёшек необходимо выпекать в течении
одной минуты с каждой стороны. Какое минимальное время требуется бабушке, чтобы
приготовить пять лепёшек? Изобразите план приготовления пяти лепёшек графически.
Задача 2. К реке одновременно подошли три купца и три разбойника. Всем необходимо было
переправиться на противоположный берег. У берега стояла лодка, которая могла вместить
только двух человек. Если во время переправы на берегу число купцов и разбойников будет
одинаковым, то разбойники не тронут купцов; если же число разбойников превысит число
купцов хотя бы на одного человека, то разбойники убьют купцов. Перед купцами стояла
сложная задача, но она была ими решена все перебрались на тот берег и жертв не было. Как
сумели перебраться купцы и разбойники и сколько рейсов совершила лодка? За рейс следует
считать движение лодки в одном направлении.
Придумайте обозначения и оформите план греправы в таблице.
count, i, d1, d2, d3, d4, d5, d6: integer;
const
MIN = 189980;
MAX = 205505;
begin
count := 0;
for i := MIN to MAX do
begin
d1 := i div 100000;
d2 := i mod 100000 div 10000;
d3 := i mod 10000 div 1000;
d4 := i mod 1000 div 100;
d5 := i mod 100 div 10;
d6 := i mod 10;
if ( (d6 * 100000) + (d5 * 10000) + (d4 * 1000) + (d3 * 100) + (d2 * 10) + d1 ) = i
then
count := count + 1;
end;
writeln('в промежутке от ', MIN, ' до ', MAX, ' ', count, ' счастливых билетов');
end.
count, i, d1, d2, d3, d4, d5, d6: integer;
const
MIN = 189980;
MAX = 205505;
begin
count := 0;
for i := MIN to MAX do
begin
d1 := i div 100000;
d2 := i mod 100000 div 10000;
d3 := i mod 10000 div 1000;
d4 := i mod 1000 div 100;
d5 := i mod 100 div 10;
d6 := i mod 10;
if ( (d6 * 100000) + (d5 * 10000) + (d4 * 1000) + (d3 * 100) + (d2 * 10) + d1 ) = i
then
count := count + 1;
end;
writeln('в промежутке от ', MIN, ' до ', MAX, ' ', count, ' счастливых билетов');
end.