Пусть скорость лодки в стоячей воде равна v км/ч, тогда её скорость по течению (v + 1) км/ч, против течения (v - 1) км/ч. Время, за которое она преодолеет 255 км: по течению 255/(v + 1) часов, против течения 255/(v - 1) часов. По условию времена отличаются на 2 часа, составляем уравнение: 255/(v - 1) - 255/(v + 1) = 2
Пусть скорость лодки в стоячей воде равна v км/ч, тогда её скорость по течению (v + 1) км/ч, против течения (v - 1) км/ч. Время, за которое она преодолеет 255 км: по течению 255/(v + 1) часов, против течения 255/(v - 1) часов. По условию времена отличаются на 2 часа, составляем уравнение: 255/(v - 1) - 255/(v + 1) = 2
n, c: integer;
begin
read(n);
c := 0;
while n > 0 do begin
if n mod 10 = 5 then inc(c);
n := n div 10
end;
write(c)
end.