Question

НУЖНА ПРОГРАММА НА ПАСКАЛЕ Смекалкин, уходя в школу, вышел из дому на 3 минуты позже младшего брата. Расстояние до школы S метров. Смекалкин идет со скоростью V1 м/мин, а его брат – V2 м/мин. Догонит ли Смекалкин брата, прежде, чем тот придет в школу?

Answer 1

Program smekalkin;  
const a=3; 
var s,v1,v2:integer;
t1,t2:real;  
begin
writeln ('s=');  
readln (s);
writeln ('v1 v2'); 
readln (v1,v2);
t1:= s/v1+a; 
t2:=s/v2;
if t1<t2 then writeln ('Смекалкин обгонит брата');
if t1>t2 then writeln ('Смекалкин не догонит брата');
if t1=t2 then writeln ('Оба брата придут одновременно'); 
end.