Допоможіть, будь-ласочка, розв*язати задачку...буду дуже сильно вдячна:))



Втомившись від буденних справ, Іван Петрович влаштував собі
відпустку – пішов на полювання. На відстані N метрів, його мисливська собака Гайзарда помітила зайця. Через
який час вона наздожене його якщо швидкість зайця V1 м/с, а швидкість собаки V2 м/с? Слід зазначити,
що Гайзарда бігає швидше за будь-якого
зайця.



Вхідні дані:


Програма на вхід
отримує три цілих числа N,
V1, V2 (0≤ N≤103, 0< V1, V2<20).



Вихідні дані:
Програма має
вивести час за який собака наздожене зайця з точністю до сотих.



1

Ответы и объяснения

2013-10-11T00:42:08+04:00
Program zadacha;
uses crt;
var N,V1,V2:integer;
    t:real;
begin     
repeat     
clrscr;     
writeln('Введіть N');     
readln(N);   
 if N<0 then   
 begin     
writeln('Відстань не може бути від''ємною!');     readln;     
end;     
until N>0;     
repeat     
clrscr;     
writeln('N=',N);   
 writeln('Введіть швидкості V1 і V2');     
write('V1=');
readln(V1);     
write('V2=');
readln(V2);     
if (0<V1) and (V1<V2)  then     
begin     
t:=N/(V2-V1);     
writeln('Час t=',t:2:2);   
 end     
else     
begin     
writeln('Гайзарда бігає швидше зайця');     
writeln('Натисніть ENTER');     
readln     
end;     
until V1<V2;     
end.