Какое расстояние пройдёт пешеход за t2 часов? - Turbo Pascal

Узнай цену своей работы

Формулировка задачи:

Пешеход прошёл S1 км за t1 часов. Какой расстояние пройдёт пешеход за t2 часов? Напишите пожалуйста программу на Turbo Pascal.
Такой вариант почему-то не идёт. Нужна готовая программа. Спасибо заранее

Решение задачи: «Какое расстояние пройдёт пешеход за t2 часов?»

textual
Листинг программы
var
 s1, s2, t1, t2: real;
begin
 write('Input s1: ');
 readln(s1);
 write('Input t1: ');
 readln(t1);
 write('Input t2: ');
 readln(t2);
 writeln;
 s2:=t2*(s1/t1);
 writeln('s2= ',s2:3:1);
 readln;
end.

Объяснение кода листинга программы

  1. В начале объявляются переменные s1, s2, t1, t2 типа real.
  2. Затем происходит чтение значений этих переменных с помощью функции readln.
  3. Выводится запрос на ввод значений переменных s1, t1 и t2.
  4. Значения переменных s1, t1 и t2 сохраняются в соответствующих переменных.
  5. Вычисляется значение переменной s2 с помощью формулы s2 = t2 * (s1 / t1).
  6. Выводится результат вычисления s2 с помощью функции writeln.
  7. Программа завершается вызовом функции readln для чтения пользовательского ввода.

Оцени полезность:

6   голосов , оценка 3.5 из 5
Похожие ответы