Объяснение:
Первыми переправляются дети.
Сын возвращается к маме-папе.
Папа едет на берег к дочери, потом дочь едет за братом и возвращается с ним к папе.
Сын едет к маме, отдает ей лодку, чтобы она переплыла к папе и дочери.
После того, как мама переправилась, дочь садится в лодку и едет к брату, подбирает его, и вместе они едут к родителям.
Дочь остается с родителями, а сын едет к рыбаку, отдает ему лодку.
Рыбак едет к родителям и высаживается.
Дочь садится и едет за братом, привозит его с собой обратно (наконец-то вся семья снова вместе), они отдают лодку рыбаку.
Лодка пересекла реку 13 раз.
Это как пример, если это сложно напишите комментарий под этим ответом)
Строим прямоугольник размером 8 метров на 6 метров с вершиной в начале координат. Для обеспечения точных построений вводим с клавиатуры числа 8, 6. Можно числа перечислить через точку с запятой — 8; 6. Введенные значения автоматически считываются после нажатия клавиши Enter.
Контролировать размеры построенного объекта можно с окна Размеры, расположенного в нижней части экрана в строке состояния. Превратим плоский прямоугольник в объёмный параллелепипед с инструмента Вдавить/Вытянуть (Push/Pull).
Помещаем инструмент Вдавить/Вытянуть на поверхность прямоугольника. Прямоугольник выделится точками. Зажимаем левую клавишу мыши, и тянем вверх по направлению вертикальной синей оси. Указываем с клавиатуры размер 3 (метра). Для подтверждения действия нажимаем клавишу Enter.
Объяснение:
// с возможно вам нужно с обычного for for i in a do begin if ((i div 7) < 0 ) then begin count := count + 1; end; end; writeln('(for) количество подходящих чисел: ', count); // с количество подходящих чисел: ', count); // с тут главное правльно поставить условие после until i := 0; count := 0; repeat if ((a[i] div 7) < 0) then begin count := count + 1; end; i := i + 1; until i = length(a); writeln('(repeat until) количество подходящих чисел: ', count); end.