Помогите написать задачу в паскале, очень срочно нужно

Question

Сумеет ли спортсмен бегущий со скоростью V(км/час) за время t(час) пробежать S(км) ?

Дмитрий Казаковцев · Accepted Answer

if V*t >= S then WriteLn('Yes') else WriteLn('No');

Елена Степанова · Answer

var v,t,s:real; 
begin 
write('v t s: '); readln(v,t,s); writeln(v*t>=s); readln 
end.

Ирина Архипова · Answer

Var
S, v, t: real;
Begin
Writeln('Введите S: ');
Read(S);
Writeln('Введите t: ');
Read(t);
Writeln('Введите v: ');
Read(v);
if S / v <= t then writeln('Успеет') else writeln('Не успеет');
End.