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

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

Пешеход прошёл S1 км за t1 часов. Какой расстояние пройдёт пешеход за t2 часов? Напишите пожалуйста программу на Turbo Pascal.
Program de;
uses crt;
var s1,s2,t1,t2,v :integer;
begin
clrscr;
v := s1 / t1;
s2 := v * t2;
WriteLn(s2);
ReadLn;
End.
Такой вариант почему-то не идёт. Нужна готовая программа. Спасибо заранее


textual

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

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.
Эта работа вам не подошла?

Вы всегда можете заказать любую учебную работу у наших авторов от 20 руб.


СДЕЛАЙТЕ РЕПОСТ

6   голосов, оценка 3.500 из 5

Источник
Похожие ответы