for i: =1 to z-1 do for j: =i+1 to z do if st[i]> st[j] then
begin
t: =st[i];
st[i]: =st[j];
st[j]: =t;
end;
st[z+1]: ='-';
for i: =1 to z do i st[i]< > st[i+1] then write(st[i],' ');
end.
Ответ дал: Гость
1.способ.перепровляются 2 мальчика потом 1 мальчик возврощается и забирает 1 взрослого и переплывает с ним потом 1 мальчик возвращается и забирает второго взрослого. 2.способ.сначало переправляются 1 мальчик и 1 взрослый потом этот мальчик переправляется и забирает второго взрослого а потом возвращается за вторым мальчиком и переправляется назад вместе с ним.
Ответ дал: Гость
картинка длжна быть в папке с программой и быть в формате bmp
Популярные вопросы