Найти двузначное число, равное утроенному произведению его цифр. ответ: 15,24.

Var i,j: integer; begin for i: =1 to 9 do   for j: =0 to 9 do   if i*10+j = 3*i*j then writeln(i*10+j); end. результат: 15 24

Если надо программу для поиска такого числа, то как вариант: //pascal var i: integer; begin   for i: =10 to 99 do       if (i=(i div 10 * i mod 10) *3) then writeln(i); end. ответ: 1524

Сначала перевозчик везёт козу, оставляет её на другом берегу и возвращается; затем он везёт волка,оставляет его на берегу, а козу везёт обратно. следующим рейсом он везёт капусту, оставляет её на берегу.возвращается и забирает козу.

 

  v=331+0,6*(-35)=310 м/c

v=331+0,6*30=349 м/c