Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
var i,i2,i3:integer;
begin
for i:=8 downto 1 do begin
i2:=i*i;
i3:=i2*i;
writeln(i:4, i2:4, i3:4);
end;
end.
Объяснение:
1)2 детей переплывут первыми
2) 2 ой возвращается
3)забирает взрослого( сам высажевается
4)(взрослый высажевается)сын плывет за другим
5) они возвращаются
Популярные вопросы