По каналу один за другим идут три теплохода: "обь", "восток" и "петропавловск". навстречу им идут один за другим теплоходы: "мир", "енисей" и "россия". канал такой ширины, что два теплохода в нём разойтись не могут. но у канала с одной стороны есть ответвление, в котором может поместиться 1 теплоход. как можно разойтись и продолжить свой путь? ​

сначала в ответвление   помещается допустим теплоход мир, далее первая тройка теплоходов проходят по каналу проплывая ответвление  вплоть до оставшихся двух, далее из ответвления выплывает теплоход мир и плывет далее по реке,   и первая тройка возвращается назад, чтобы осуществить такую же операцию уже для енисея. аналогично с россией

ну вот так это будет выглядеть с ветвлением и возможностью повторять вычисления без повторного запуска программы.

var a,b,c,d,z: integer; beginwriteln('введите 1 число'); read(a); writeln('введите 2 число'); read (b); writeln('введите 3 число'); read (c); d: =a+b+c; writeln('сумма чисел ',a,'+',b,'+',c,'=',d); writeln ('хотите ли вы решить еще один пример? 1-да, 0-нет'); read (z); while (z = 1) dobeginwriteln('введите 1 число'); read(a); writeln('введите 2 число'); read (b); writeln('введите 3 число'); read (c); d: =a+b+c; writeln('сумма чисел ',a,'+',b,'+',c,'=',d); writeln ('хотите ли вы решить еще один пример? 1-да, 0-нет'); read (z); end; end. 

2000 - k

16 бита - i

v=k*i=2000*16=32000 бита=4000 байтов