Вычисление времени движения туристов

@Chel1 · Регистрация: 08.12.2013

1)Cоздайте Паскаль программу длярешения задачи (по Вашему варианту), которая:
выводит заголовок с данными о разработчике;
обеспечивает ввод данных в диалоговом режиме;
представляет результаты в двух форматах:
с фиксированной точкой;
с плавающей точкой.

От станции до озера S км. Туристы, направляясь от станции к озеру, полтора часа шли пешком со скоростью А км, а затем сели на попутную машину, которая ехала со скоростью В км/ч. Составьте программу для вычисления времени движения туристов?

Написал код:

Pascal

Program Ur;
 
{раздел описаний}
Var  a, {скорость туристов пешком}
      b, {скорость туристов на машине}
      s, {расстояние от станции до озера}
      t: real; {время в пути}
 
Begin
 
writeln('выполнил фио');
writeln('программа расчета пути');
writeln('введите данные');
 
writeln('общий путь');
readln(s);
writeln('скорость туристов пешком');
readln(a);
writeln('скорость туристов на машине');
readln(b);
t:=((s-1.5*a)/b)+1.5;
writeln('результат');
writeln(t:3:2);
writeln ('время туристов в пути');
readln(t);
end.

@GreenForest · 09.12.2013, 21:33

Сообщение от Chel1

readln(t);

тут просто readln;. В самом конце.

@Chel1 · 09.12.2013, 21:41 **[ТС]**

Сообщение от GreenForest

тут просто readln;. В самом конце.

Спасибо исправлю, в остальном все норм? Насчет формулы сомневаюсь.

@GreenForest · 09.12.2013, 21:42

Chel1, формула точно такая.

@GreenForest 50 / 42 / 25 Регистрация: 05.12.2013 Сообщений: 275
	09.12.2013, 21:33	2
	Сообщение от Chel1 readln(t); тут просто readln;. В самом конце. 1

@Chel1 0 / 0 / 0 Регистрация: 08.12.2013 Сообщений: 7
	09.12.2013, 21:41 [ТС]	3
	Сообщение от GreenForest тут просто readln;. В самом конце. Спасибо исправлю, в остальном все норм? Насчет формулы сомневаюсь. 0

@GreenForest 50 / 42 / 25 Регистрация: 05.12.2013 Сообщений: 275
	09.12.2013, 21:42	4
	Chel1, формула точно такая. 0

Опции темы