Мальчик может бегать в три раза быстрее, чем ходить. скорость его ходьбы равна 4 км/ч. он принял участие в марафонском забеге, но сошел с дистанции, пробежав только х км. сколько времени он потратил на преодоление этого расстояния. записать уравнение в паскале

program z1; Var v,S:Integer; t:real; Begin v:=12; WriteLn('Известно что мальчик бегает в 3 раза больше чем ходит'); WriteLn('3 км/ч его ходьба, следовательно 12 км/ч его бег'); Write('Введите кол-во километров прбегаемых мальчиков: '); Read(S); t:=S/v; WriteLn('Время потраченое мальчиком на пробежку = ',t,' час(ов)'); end.